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Introduction 


This book, written for those who want a greater 
understanding of their computer’s operation, is 
recommended for programmers who are familiar 
with the essential concepts of machine language and 
experienced in programming home computers in 
BASIC. It is also for machine language program¬ 
mers. Many of the examples given in the book are 
machine language subroutines that can be used by 
machine language programmers or called from 
BASIC to increase the speed of BASIC programs. 
This book is divided into three sections: 

• Technical information 

• Game and graphics design 


• A description of the code for a game program 


After you have mastered some of the program¬ 
ming techniques, you will be shown how to take a 
game concept and turn it into a video game. Many 
of the routines presented in this book were created 
expressly for use in video game programming. 
However, in many cases techniques used in pro¬ 
gramming video games carry over into all other 
fields of programming. By experimenting with the 
new concepts and techniques as you read, you will 
find that you are increasing your understanding of 
how to fully utilize your Commodore 64. 
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Chapter 1 
You and Your TV 


Virtually every home in the country has at least one 
television set, and televisions, like many other 
domestic appliances, tend to be taken for granted. 
Most people do not have any idea of how they work. 
Since you are interested in having the television 
display your ideas and visions in the form of a video 
game, you should have some idea of how an image 
is generated on the television screen to best utilize 
the capabilities of your computer. 

HOW A COMPUTER DISPLAYS A PICTURE 

The face of a video display is coated with special 
phosphors. An electron beam strikes the face of the 
tube causing the phosphors to glow. On a black and 
white monitor, this process produces a dot. This 
glowing dot is called a pixel . A pixel is the smallest 
area that a computer can control on the screen. A 
color monitor uses three electron beams and three 
different colored phosphors to create one pixel. 

The electron beam scans from left to right 
across the face of the monitor. By controlling the 
intensity of the electron beam during its scan, dif¬ 


ferent points on the screen receive different inten¬ 
sities. 

When the beam gets to the right edge of the 
screen, a horizontal sync pulse causes the beam to 
cut its intensity and return to the left side of the 
screen on the next line down. This process is 
repeated 262-1/2 times to form one display screen. 
At the end of the screen, a vertical sync pulse is in¬ 
itiated. During the vertical sync pulse, the beam 
returns to the upper left side of the screen and the 
whole process is ready to start again. On the Com¬ 
modore 64, the computer's hardware automatically 
inserts both the horizontal and vertical sync pulses, 
so the programmer need not worry about generating 
them. 

When a Commodore 64 is driving the monitor, 
200 scan lines are used to display text and graphics 
with the other 62 lines being used for the border. 
The display process is repeated 60 times per second, 
providing a flicker free display. 

There is a time correlation between the speed 
of the microprocessor and the position of the beam 
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on the face of the screen. Some special effects can 
be created by using this fact and changing the 
display parameters on the fly. In the time it takes 
for the microprocessor to go through one machine 
cycle, the beam travels approximately 6 pixels on 
the display screen. 

WHAT IS ANIMATION 

As you were reading the description of the 
generation of a TV frame, you may have noticed that 
the only thing that a monitor can display is a series 
of still frames. Thus the question of how you can 
get animation out of still pictures arises. 

There is a characteristic of the human eye call¬ 
ed the flicker fusion frequency, which allows us to 
view TV shows and movies without seeing that they 
are made up of still frames. This frequency is 24 
frames a second. Any time a series of pictures is 
shown at a rate faster than 24 hertz, the eye can no 
longer distinguish the individual pictures. If the 
computer makes small changes in its display faster 
than 24 times per second, these changes will give 
the appearance of being continuous. 

It is important to understand that the programs 


you will be writing create a series of still frames, 
not continuous motion. Because the computer up¬ 
dates the screen 60 times per second, this is the 
fastest that any changes can occur on the screen. 
If an object is in motion at the speed of one pixel 
per screen change, it takes about 5.3 seconds for 
the object to get from one side of the screen to the 
other. If the object needs to go faster, it has to move 
more than one pixel per screen update. On the other 
hand, if the object is to go slower, it has to stay still 
during some screen updates. 

Because the video monitor provides a known 
minimum update time of 1/60 second, this tends to 
become the time period by which most aspects of 
the game are measured. This period of'fime (1/60 
second) will be called a screen. 

From what you have read, you might assume 
that completely different displays could alternate 30 
times per second, and the eye would fuse them. This 
is true; multiplexing is the term used to refer to this 
technique. Some care must be taken when you at¬ 
tempt to use this technique. The differences be¬ 
tween the two screens should not be excessive, and 
best results are achieved using small fast moving 
objects. 
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Chapter 2 
A Language for Games 


The first question that arises when you are starting 
work on a computer project is, “What language 
should I program in?” Your first inclination might 
be to use BASIC. However, if your program is us¬ 
ing any type of continuous motion, BASIC would 
most likely be too slow to be useful. If you try to 
write anything more than the most simplistic game 
in BASIC, you will find the motion of the objects 
slow and erratic. There are limits to how quickly 
sounds and colors can be changed. 

All of these problems arise because the BASIC 
interpreter controls the computer, not the program. 
Every line in a BASIC program must be analyzed, 
decoded, and translated into a series of machine 
language instructions EVERY time the line is en¬ 
countered. BASIC is also a very general language 
in that similar lines may have different functions. 
By the time a line is analyzed, the resulting section 
of machine code is not efficient. For all of these 
reasons, a BASIC program will never run particular¬ 
ly fast. 

lb achieve smooth animation, the program must 


be able to update the screen at least 30 times per 
second. Because BASIC does not have an easy way 
to talk to the hardware registers, (PEEK and POKE 
commands must be used), calculating new positions 
and updating the registers can easily take longer 
than 1/30 second, causing erratic motion. This same 
problem occurs when the sound registers must be 
updated. There may not be enough time to make 
a consistent sound. 

Machine language, on the other hand, is the 
most efficient form that a program may take. Each 
instruction in the program is executed exactly as it 
is entered. There is no interpretation done on the 
code, so it runs at the highest possible speed. You 
also know the status of the entire computer at every 
step—which rarely happens in a BASIC program. 

The major drawback to programming in 
machine language is that it is a collection of hex¬ 
adecimal codes. This is fine for the computer, 
because the binary data that these codes represent 
can be immediately executed, but it is cumbersome 
for the programmer. Most programmers do not en- 




joy memorizing all of the hex codes, and even fewer 
enjoy reading such a program when it is finished. 

ASSEMBLY LANGUAGE 

The alternative to these two extremes is to pro¬ 
gram in assembly language. Assembly language is 
a languag e that uses an assembler that translates 
the mneumonics (memory aids) for the CPU’s in¬ 
struction set into the binary data that the processor 
can execute. This translation takes place once before 
the program is run, so the final program will be 
machine code. You end up with all of the speed ad¬ 
vantages of a machine language program with none 
of the headaches. A properly written assembly 
language program is just as efficient as its machine 
language counterpart, so there is no reason to pro¬ 
gram in machine language if you can gain access 
to an assembler. 

With an assembly language program, the pro¬ 
grammer normally has more than enough time to 
do all of the calculations and updates to keep the 
animation constant and smooth. The program can 
also make use of all of the hardware features of the 
computer to create effects that are not possible 
through BASIC. When you are using assembly 
language, the computer is completely under soft¬ 
ware control, making it possible to determine what 
the computer is doing at all times. An assembly 
language program executes faster than any other 
type of program, which makes assembly language 
the language of choice for programming games. 

Learning to program in assembly language is 
not as traumatic an experience as most program¬ 
mers would have you believe. Unlike BASIC, the 
machine will always be doing exactly what you tell 
it to do. The main difference between BASIC and 
assembly language is that in assembly language you 
must keep track of where the data is in memory and 
where it must go. BASIC keeps track of variables 
for you, but it won’t tell you where they are. In 
assembly language, you can define various memory 
locations so that they have some meaning to you. 

For instance, you could define $20 to be the 
player horizontal position. ($ indicates a hexadecimal 
number; $20 is equal to 32 in the decimal system. 


See Chapter 3 for more information.) Whenever you 
need to find out what the horizontal position is or 
need to modify it, you would look into location $20. 
You can create your own variables in BASIC using 
the same technique. You would POKE the value in¬ 
to $20 and PEEK it back out whenever you needed 
it. This is a particularly useful technique when you 
mix BASIC and assembly language, because each 
program will know where to find the data from the 
other program. 

USING AN ASSEMBLER 

The rest of this book assumes that you will be 
programming in assembly language, and most of the 
examples are written in assembly language. If you 
are a BASIC programmer, you may be able to use 
some of these routines to speed up parts of your 
programs. 

Each assembler has its own set of pseudo 
opcodes —the instructions that tell the assembler to 
do something other than create code. In order to en¬ 
sure that you will be able to use these routines, the 
following is a listing of the pseudo-opcodes used by 
Commodore’s Macro Assembler Development 
System, which is the assembler used in this book. 
By modifying these instructions to match those of 
your assembler, you should be able to run any of 
the examples in this book. Normally, you can type 
in one of these instructions anywhere that it is legal 
to type in one of the CPU’s opcodes. 

.BYTE Reserves one or more bytes of 

data starting at the current lo¬ 
cation counter value 

.WORD Reserves 16 bit data in a LOW 

byte-HIGH byte format 
.DBYTE Reserves 16 bit data in a 

HIGH byte-LOW byte format 
* Program location counter 

•LIB Insert another disk file follow¬ 

ing this command 
.END End of file marker 

= Assigns 

a value 
to a 
symbol 
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< Specifies the low order 8 

bits of a 16 bit value 

> Specifies the high order 

8 bits of a 16 bit value 
.MAC Starts a macro 

.MND Ends a macro 

All of the above may be preceded by a label. 

? Precedes a number that 

specifies which parameter 
to pass to the macro. It 
can also be used as a 
label. 

These are all of the commands that may be dif¬ 
ferent from those in your assembler. With this list, 
you should be able to read all of the program listings 
and modify them to work with your assembler. 
Many assemblers come with a program that will 
translate files with this syntax into their own syn¬ 
tax. If your assembler has one of these programs, 
you will not have to make many changes by hand 
to assemble the listings on the distribution disk. 

WHAT AN ASSEMBLER CAN DO FOR YOU 

An assembler relieves you from memorizing the 
actual machine codes for each of the instructions. 
It also calculates the distance from one instruction 
to another for those times when a branch must be 
taken from the main program. This is not a par¬ 
ticularly big deal for a short program (trader 50 
lines), but as a program grows larger and more com¬ 
plex, the task of repeatedly doing these calculations 
by hand becomes unreasonable. (If you are the type 
of person who finds great enjoyment in hand coding 
machine language programs, let me apologize here 
for suggesting there is a better way. The rest of us 
will let the computer do the tedious jobs). 

The most useful feature of an assembler is its 
ability to let you assign names. A name can be given 
to a memory location, hardware registers, or a loca¬ 
tion within the program. Once names have been 
assigned, it is no longer necessary to remember long 
lists of confusing addresses. You only need to 
remember the names you have assigned to the ad¬ 
dresses. Since you will normally assign names that 


carry some meaning (at least to you) to the memory 
locations and program segments, the program 
becomes infinitely more readable than if the ad¬ 
dresses themselves had been used. 

But wait, did that last sentence use “readable” 
when referring to an assembly language program? 
Yes it did. Assembly language programs become il¬ 
legible to others because it is rare to see a full listing 
of the program with all of its definitions; and, often 
a disassembly of a program is called the original pro¬ 
gram. (A disassembly has no legitimate names, just 
addresses.) 

All good assemblers also have the ability to use 
macro-instructions (macros). A macro is a shorthand 
notation that represents a series of assembly 
language commands. For example, a macro that in¬ 
crements a two byte value by a one byte value could 
be coded as follows: 


.MAC DBINC 
LDA ?1 
CLC 

ADC #?2 
STA ?1 
LDA ?1+1 
ADC #$00 
STA ?1+1 
.MND 


REGISTER NAME, DATA 
LOAD THE LOWER BYTE 
CLEAR THE CARRY BIT 
ADD WITH CARRY THE DATA 
STORE THE LOWER BYTE 
LOAD THE UPPER BYTE 
ADD THE CARRY BIT 
STORE THE UPPER BYTE 
END OF MACRO 


This macro is used to increment any two con¬ 
secutive bytes, such as a score. If the score needed 
to be incremented by $20, you would type: 

DBINC SCORE,$20 

which would be expanded by the assembler to read: 

LDA SCORE 
CLC 

ADC #$20 
STA SCORE 
LDA SCORE + 1 
ADC #$00 
STA SCORE +1 

This is certainly easier than typing the same 
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series of instructions every time that you need to 
increment a two byte value. A program that uses 
macros will be easier to read as you work on it than 
one written using individual instructions. Once you 
have written and debugged a macro, it becomes a 
tool that can be quickly used whenever necessary. 
By building up a library of macros, you will be able 
to program quite difficult functions in a minimal 
amount of time. 

There are many cases in which it is a better idea 
to use a subroutine instead of a macro. Each time 
a macro name is entered into a program, the 
assembler expands it into its individual instructions. 
This means that each time the macro is called, it 
is treated as if you have entered all of its instruc¬ 
tions by hand, and uses the same amount of memory 
as if you had. 

For a function that is repeatedly used and takes 
a large amount of code, it is better to use a 
subroutine. A subroutine is called using the JSR in¬ 
struction and is only stored once in the program. 
If you write a routine to display text on the screen 
that many different parts of the program are going 
to be calling on often, it is best treated as a 
subroutine. You may build up a library of 
subroutines in the same manner in which you build 
up a library of macros. 

Normally, in the course of working on a game 
you will run into a situation that requires you to 
write a specialized routine to perform a certain func¬ 
tion. If you think that you will be able to use this 
function at a later time, you should incorporate it 
into either your subroutine or macro library. This 
way, you will quickly have the major routines that 
are common to most programs at your fingertips. 

An assembler must also provide some means 
of defining data areas and data. Thbles of data can 
be defined, given a name, and stored by the 
assembler. A good assembler allows you to define 
data in terms of mathematical expressions. It also 
allows data to be defined as one or two byte values. 
There is a further option on two byte values as to 
whether the high byte or the low byte will be stored 
first. For many programs, text must be stored for 
later printing. On some assemblers, you have the 
option for text to be stored with the high bit on or 


off. This can be useful for finding the end of a text 
string. 

Finally, an assembler must allow you to enter 
assembly language commands. After all, that is the 
point of an assembler. 

HOW TO CHOOSE AN ASSEMBLER 

If you are to successfully create your own 
machine language video games, you must become 
familiar with your primary design aid, the assembler 
program. Next to your computer, a good assembler 
program is the most essential tool for the creation 
of a machine language program. 

There are three parts to a good assembler 
package: 

• A text editor 

• The assembler 

• A machine language monitor 

The text editor is the part of the assembler that 
you will spend the most time with. It allows you to 
enter, modify, and update your program. Some 
assemblers allow you to use a word processor to 
enter your program. Whatever method you choose, 
make sure that you are comfortable with the editing 
commands that are available on your text editor. 

It is a good idea to try out an editor before buy¬ 
ing it. Some assemblers come with editors that are 
very limiting in what they allow you to do. Limita¬ 
tions in the editor take from your programming 
time, so it pays to shop around for a good one. 

Once the program has been entered into the 
editor, it must be assembled before it can be used. 
Some assembler packages force you to load the 
assembler at this point, while others already have 
it loaded. An assembler that has all of the programs 
you need loaded simultaneously is called a coresi¬ 
dent assembler. 

A coresident assembler can save you quite a bit 
of time if you like to write a small section of code 
and immediately try to assemble it to check for er¬ 
rors. If you have a coresident package, remember 
always to save your source code before attempting 
to run your program. You can lose all of your latest 
work if your new program locks up the computer, 


6 



forcing you to turn it off. In fact, no matter what 
type of assembler you are using, you should save 
your source code often as you are writing it. 

Another aspect to examine while you are choos¬ 
ing an assembler is the speed with which it can 
assemble your source code and generate the 
necessary files on disk. Unfortunately, you can’t ex¬ 
pect the assembler to work faster than the disk can 
move the data. 

You also should be sure that any printouts 
generated by the assembler contain all of the infor¬ 
mation that you would like. The following are some 
of the items that differ between assemblers: 

• Sorted symbol table with absolute addresses 

• Macro expansion 

• Data expansion 

• Absolute addresses for all code 

• Absolute addresses for RAM registers 

Depending on how you approach debugging your 
program, these different functions will have dif¬ 
ferent levels of importance to you. 

A symbol table is generated by all assemblers 
at some point. It is a list of the names used in the 
program and the addresses that correspond to the 
names. A printout of the table can help you verify 
the assembler is working properly and gives you a 
quick guide to any location used by the program. 
For this reason it helps if the machine sorts the table 
alphabetically before printing. On the other hand, 
if the assembler only prints out the symbol names 
and its internal representation of the addresses 
(usually filled in later by the assembler), the 
printout is useless for most purposes. 

If you are going to use macros in your program, 
it is useful to have an assembler that lets you specify 
whether or not it should expand the macro before 
it is printed. When a macro is expanded for print, 
the macro name is expanded for print, the macro 
name is printed followed by the code it generates 
with all of the substitutions shown. On the printout, 
all of the instructions of the expanded macro are 
generally preceded by a + symbol. Without a macro 
expansion on the printout, you must constantly refer 
back and forth between a listing of your macro 


library and the section of code where the macro was 
called. This can be quite time consuming and 
prone to error as you expand the macro by hand for 
debugging purposes. But once all of your macros 
have been debugged and you are familiar with them, 
you rarely need to see them expanded on your 
printouts. 

Since most assemblers allow you to use expres¬ 
sions in data statements, you should be able to get 
a printout of the calculated data. With such a listing, 
you can verify that the assembler generated the ex¬ 
pected data. Again, once you are familiar with the 
operation of your assembler and your data has been 
debugged you rarely need to see this part of the 
printout. 

Beware of an assembler that won’t tell you 
where it has put your code or data. Your assembler 
should have in its printout absolute addresses for 
every instruction, data statement, and hardware or 
RAM register that has been used. If your assembler 
does not provide this information, you will find your 
program extremely difficult to debug. 

The output of most assemblers is an in¬ 
termediate file that contains all of the information 
needed about your program. This file is usually one 
form of a hex file. Hex files store the information 
about the program in a hexadecimal format that can 
be easily transmitted or loaded into the computer. 
(Binary data is more difficult to transfer from one 
machine to another.) You will use a program called 
a loader to translate the hex file into a binary file 
and place the data in the proper place in the 
computer. 

One potentially useful option on most loaders 
is the ability to relocate the loading address of a pro¬ 
gram. For example, if you write a program to be 
placed on a cartridge, it needs to run from a different 
place in memory than if it is to be stored in RAM. 
The ability to relocate a program allows you to test 
it in one location although it is intended to run at 
another. 

The last piece of an assembly language develop¬ 
ment system is a monitor. This is a program that 
allows you to examine the computer’s memory and 
change or move the contents. It also must allow you 
to load and save areas of memory from the disk 
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drive. A good monitor has a small disassembler that 
allows you to view memory as assembly language 
commands. 

A word of caution: it is not a good idea to get 
a monitor in a cartridge. A monitor on a cartridge 
resides in a permanently fixed place in memory. If 
your program needs to use this area, you can't use 
the monitor. In fact, if the monitor must reside in 


only one predefined place in the computer, it can 
be useless. Either the monitor should be relocatable, 
or you should be given two or more different ver¬ 
sions of the monitor. If you have a version of the 
monitor that resides in high RAM and another ver¬ 
sion that stays in low RAM, usually you will be able 
to use one of them. 
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Chapter 3 
Underlying Concepts 


At this point, some of the essentials that you need 
to know in order to understand the rest of this book 
will be presented. The terms and names that will 
be used will be defined. The hardware of the Com¬ 
modore 64, and in particular, a programming model 
of the 6510 microprocessor will be discussed. Also, 
the hexadecimal numbering system (base 16), which 
is used throughout this book, will be described. This 
numbering system makes the most sense when 
dealing with computers. Since an understanding of 
the hexadecimal numbering system and its relation¬ 
ship to bits and bytes will make the hardware 
descriptions easier to understand, it will be 
presented first. 

BITS AND BYTES 

A bit is the smallest meaningful piece of infor¬ 
mation that can be stored. It can have only two 
values, 1 or 0. Other terms for these values are 
shown below: 


1 0 

ON OFF 

SET CLEAR 

HIGH LOW 

All of the signals inside of the computer can on¬ 
ly be in one of these two possible states. So how does 
the computer perform so many functions if it only 
has two states to work with? 

By grouping a collection of bits together, the 
group of bits together can have a value that is equal 
to 2 raised to the power of the number of bits in the 
group. If we grouped 4 bits together, the group could 
have 16 possible values according to the equation 
2~N where N is the number of bits in the group: 

2~N N=4 

2~4 

2*2*2*2=16 

A grouping of 4 bits is called a nibble. Each of the 
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four bits is given a value depending on its position 
in the group. Spreading the bits out horizontally, the 
bit on the right is called the least significant bit 
(LSB). The bit on the left is called the most signifi¬ 
cant bit (MSB). The location of each bit in the byte 
is given a value of 2~N, where N is the number of 
bits from the LSB that the location in question is. 
For instance the LSB is located on itself so its 
distance (N) would be 0. Therefore, the LSB can 
have a value of 0 or 1 depending on the state of its 
bit. The next bit on the left would have a value of 
2 / T. 

The group of four bits could have sixteen values, 
0 through 15, as you have seen. As discussed earlier, 
the value of the bit depends on its location in the 
group and its state. To compute the value of the 
group of bits, you simply add together the value of 
each location in the group whose corresponding bit 
is ON. By summing the total of all of the positions 
in a group, the maximum value of a group can be 
determined. In the case of a nibble, the maximum 
value would be 15. 

If 8 bits were grouped together, the equation 
would be: 

2~N N=8 

2~8 

2*2*2»2*2*2»2*2=256 

So a group of 8 bits can have 256 different values. 
This grouping is referred to as a byte. Since 0 is the 
first of the possible values of a byte, the range of 
values is from 0 to 255. Inside the Commodore 64, 
all of the data is represented and transferred as 
bytes. This is what is meant when the C-64 is re¬ 
ferred to as an 8 bit machine. A byte is the standard 
unit of storage in the Commodore 64. 

It was mentioned earlier that hexadecimal 
would be the standard notation to be used in this 
book. This is because one hexadecimal (hex) digit 
can represent 16 values or one nibble if it is 
representing a group of 4 bits. Thus it requires 2 
hex digits to represent any 8 bit value or any byte. 
The correlation between the 4 bits of a nibble, its 
decimal value, and its hex value is shown in Table 
3-1. 


Table 3-1. The Relationship Between the 
Binary, Hex, and Decimal Number Systems. 



You may notice that until the tenth value, (the 
number 9) the same numbers are used in both hex 
and decimal numbering systems. In hex however, 
the next 6 numbers are represented by the first 6 
letters in the alphabet. 

From this point forward, all hex numbers will 
be preceded by a dollar sign ($) to differentiate a 
hex number from a decimal number. This is the 
standard notation used by virtually all assemblers 
that assemble code for the 6500 series of 
microprocessors. If there is no $ preceding a 
number, it is assumed to be a decimal number, 
unless it contains any of the letters A-F, in which 
case you can assume that a mistake has been made. 

THE HARDWARE 

Like all computers, the Commodore 64 is made 
of a number of complex integrated circuit chips. You 
can conceptualize the internal workings of the com¬ 
puter as being broken down into 5 different sections: 


10 




Central processing unit 

Memory 

Video generation 

Sound 

Input and Output 

In the Commodore 64, the central processing 
unit ( CPU) is a 6510 microprocessor chip. It ex¬ 
ecutes the same instruction set as a 6502 
microprocessor as used in Apple and ATARI com¬ 
puters. It runs with a clock frequency of 1.0225 
MHz. For all practical purposes, this can be con¬ 
sidered to be a 1 MHz clock. The 6510 has an ad¬ 
dressing range of 65536 bytes (64K). 

There are two different types of memory in the 
Commodore 64. It has 64K of dynamic RAM, which 
can be banked into the address space of the other 
chips as necessary. There is also 20K of ROM in 
the system. In this ROM are the BASIC program¬ 
ming language and the operating system of the 
Commodore 64. The operating system is responsi¬ 
ble for reading the keyboard, updating the real-time 
clock, and transferring data in and out of the system, 
among other things. Since the CPU can only address 
64K of memory, all of the RAM cannot be access¬ 
ed simultaneously with all of the ROM. Tb overcome 
this problem, the technique of bank switching is 
used. For instance, if you are not using BASIC, 
there is no need for the BASIC ROM to be accessi¬ 
ble. In this case, it can be replaced with RAM. The 
CPU cannot tell the difference, so it can be “trick¬ 
ed” into addressing more then 64K of memory. 

Video generation is a task that is taken care of 
by a 6567 Video Interface chip (VIC II). All of the 
various graphic modes of the Commodore 64 are 
generated by this chip. In the process of generating 
the video signal, the VIC-II chip refreshes the 
dynamic ram chips used in the system. The VIC-II 
chip also generates the system clock from the 8.18 
MHz dot clock. 

Sound is generated by a 6591 Sound Interface 
Device chip (SID). This chip can generate 3 indepen¬ 
dent voices each in a frequency range of 0 to 4 kHz. 
This corresponds to a range of about 9 octaves. Each 
voice has an independent volume envelope and a 
choice of waveforms. The SID chip can also provide 


a number of filtering options for use with its own 
signals or an externally supplied signal. 

Input and output functions are handles primari¬ 
ly by a pair of 6526 Complex Interface Adapter chips. 
Serial communication functions as well as the 
parallel port are maintained by these chips. They 
also handle input from the joysticks and the real 
time clock. These chips each provide a pair of in¬ 
dependent 16-bit timers. 

If you understand how these four devices work, 
you can make the computer do anything it is capable 
of. Your program will be primarily concerned with 
the VIC-II chip and the SID chip. The CPU is the 
chip that the program is written for, and it is 
directed to modify the registers in the other chips 
at the appropriate time for the intended function. 
Writing almost any type of program eventually 
comes down to controlling just a few chips. Once 
you control the major chips the rest of the program 
should be easy. 

6510 ARCHITECTURE 

In order to program in assembly language, you 
must understand the internal functions of the 
microprocessor. Figure 3-1 is a block diagram of the 
6510. The value of the program counter is output on 
the address lines of the microprocessor whenever a 
data access is to be performed on the systems 
memory. In the Commodore 64, all of the hardware 
registers appear to be memory locations to the 
microprocessor, so accesses to hardware registers 
and memory appear identical. 

The accumulator is the most important register 
in the computer. Almost all of the data that passes 
through the system goes through the accumulator. 
Every arithmetic function, other than incrementing 
and decrementing, is performed in the accumulator. 
Data can be read into the accumulator from memory, 
modified, and stored back into memory. 

The X and Y registers are very similar. They 
move data in a manner similar to the accumulator. 
They can also be used as an index to an array of 
data. It should be noted that while these two 
registers are similar, their functions are not iden¬ 
tical. Some instructions require the use of the X 
register while others use the Y register. 
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Fig. 3-1. Block diagram of the 6510 microprocessor. 


Each of the bits in the status register correspond 
to one of the conditions in the microprocessor. Some 
of these bits can be changed under software control. 

In the Commodore 64, the stack (a temporary 
data storage area between $0100 to $01FF) is con¬ 
trolled by the slack pointer. This register contains 
the address of the next empty space on the stack. 


At the start of a program the stack pointer is usually 
initialized to $FF, which corresponds to the top of 
the stack. The microprocessor defines the stack to 
start at $0100. The stack pointer is used as an in¬ 
dex from the bottom of the stack. 

With these concepts in mind, it is time to look 
at the language. 
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Chapter 4 

The 6510 Assembly Language 


In Appendix A are a series of charts that describe 
all of the instructions available in the 6510 as well 
as their addressing mode options. You may wish to 
refer to these charts as you are reading the follow¬ 
ing sections on instruction types and addressing 
modes. As you begin to program in assembly 
language, you will find yourself constantly refer¬ 
ring to these charts. 

All of the instruction lines used in assembly 
language take the following format: 

LABEL OPCODE OPERAND ;comment 

The opcode is the instruction that you want ex¬ 
ecuted. The operand is the data, label, or memory 
address that will be operated on. 

Comments are particularly useful in document¬ 
ing your program and should be used often. A prop¬ 
erly documented program is much easier to read 
and understand. A comment can either follow an 
instruction or be on a line by itself. A comment must 
be preceded by a semicolon. 


Labels prevent assembly language from becom¬ 
ing unmanageable. A label must start in column 1 
of the program line. A label can be assigned a value 
or can take on the value of the program counter dur¬ 
ing assembly. When used as the operand in a branch 
instruction, the assembler determines the length of 
a branch, which is much easier than calculating the 
branch distance by hand. Also, if a change is made 
in the program, the assembler can compensate for 
any changes in the branch. If the calculations are 
done by hand, they have to be redone every time 
there is a change. 

INSTRUCTION TYPES 

There are 4 classes of instructions in the 6510. 
These are: 

• Data movement 

• Arithmetic 

• Testing 

• Flow of control 
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Data movement instructions are instructions that 
cause a value to be loaded from memory, stored 
into memory, or transferred from one register to 
another. There are a number of options as to how 
the address of the byte to be loaded will be deter¬ 
mined. In the load accumulator instruction, LDA, 
there are eight different addressing modes that can 
be used to determine which byte to load. The dif¬ 
ferent addressing modes are explained in the follow¬ 
ing section. 

Arithmetic instructions are used to modify data 
in some way. This class of instruction includes 
logical operations, such as the AND and ORA in¬ 
structions. There are instructions that allow a byte 
to be rotated as well as addition and subtraction 
commands. As with the data movement instruc¬ 
tions, most of the available addressing modes can 
be used by the arithmetic instructions. 

listing instructions allow a nondestructive test 
of data in the microprocessor. For instance, when 
a CMP instruction is used to check a value in 
the ACCUMULATOR, the data in the 
ACCUMULATOR will not be changed in any way. 
The bits in the STATUS register will be changed 
in the same way as if the data to be compared was 
subtracted from the ACCUMULATOR. These in¬ 
structions are generally used to modify the STATUS 
register prior to executing a branch instruction. 

Flow of control instructions are the branching 
and jump instructions. These are used to change the 
order in which different sections of code are ex¬ 
ecuted. The branch instructions are all conditional 
branching instructions. That is, each instruction 
checks one of the bits in the status register and, 
depending on its value, will either branch to the in¬ 
struction pointed to in the operand or execute the 
next instruction in line. 

Jump and jump to subroutine instructions also 
fall into the flow of control category. These are 
known as absolute commands because they do not 
check any conditions before performing a jump. 


ADDRESSING MODES 

In the 6510 microprocessor, there are 11 types 
of addressing modes. They are: 


Immediate 
Zero page 
Zero page,X 
Absolute 
Absolute,X 
Absolute,Y 


(Indirect,X) 
(Indirect),Y 
Implied 
Relative 
Indirect 


Many of the addressing modes can be used by the 
LDA, or load accumulator, instruction. This instruc¬ 
tion causes a byte to be loaded into the accumulator. 


Immediate Mode Addressing 

In the immediate mode, the data that follows 
the # character will be loaded into the accumulator. 
Instead of entering data to be loaded, you could 
enter a label that has previously been equated to 
a value. For example, if you had defined the label 
BLACK to equal 0, the following statements would 
be identical: 

LDA #$00 

LDA #BLACK 

In either case, a 0 is loaded into the accumulator. 
In all of the other modes, data is loaded from a 
memory location as indicated by the operand. 

Zero Page Addressing 

The zero page of memory, the memory locations 
in the range $00 to $FF, has a special meaning to 
the 6510. A location in this range can be accessed 
faster than anywhere else in memory. This results 
from the fact that the upper byte of the address will 
always be $00, so it need not be read from the 
operand during program execution. This also means 
that a program will be shorter because the upper 
byte of the address is not part of the code. Exclusive 
use of zero page memory can cut the program size 
and execution time by a third. 

Zero page addressing modes take a one byte 
value as an operand to select the memory location. 
For example, if you want to load the contents of 
memory location $23 into the accumulator, you 
could enter the following: 

LDA $23 
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Zero Page Indexed Addressing 

Zero page indexed addressing uses the contents 
of the X register to determine the memory address 
to be accessed. Using the load accumulator instruc¬ 
tion as an example, the memory address to be load¬ 
ed is generated in the following way: 

1. A memory address is specified in the in¬ 
struction. 

2. The value of the X register is added to this 
address. 

3. The data from this generated address is load¬ 
ed into the accumulator. 

Zero page indexed addressing can only be used with 
the X register. Since the X register can contain an 
8 bit value, an offset of up to $FF from the address 
specified in the instruction can be generated. In¬ 
dexed addressing is used extensively when you are 
looking up a value in a table of data. A value cor¬ 
responding to the distance into the lookup table 
would be loaded into the X register, then the in¬ 
dexed load instruction would be issued. 

Absolute Addressing 

Absolute addressing uses a two byte value in 
the operand to generate a 16 bit memory address. 
Due to this, the 6510 can address any byte in the 
range of $0000 to $FFFF. Normally, the assembler 
will select the most efficient version of this instruc¬ 
tion. If it is possible to use zero page addressing in¬ 
stead of absolute addressing, the assembler will 
generate this form of the instruction. 

Absolute Indexed Addressing 

Absolute Indexed addressing works in the same 
way as zero page indexed addressing except that a 
two byte address is specified in the operand. Also, 
the Y register can be used as the index register in 
absolute indexed addressing. Using a load ac¬ 
cumulator instruction, the following steps are taken 
to load a byte: 

1. A memory address is specified in the in¬ 
struction. 


2. The value of the index register is added to this 
address. 

3. The data from this generated address is load¬ 
ed into the accumulator. 


Indirect Addressing with Indexes 

So far, all of the addressing modes have as¬ 
sumed that you knew where the data you were in¬ 
terested in was ahead of time. Since this is not 
always the case, there needs to be a way for the com¬ 
puter to determine an address during program 
execution. 

Indirect addressing means that you are not tell¬ 
ing the microprocessor where the data that you want 
to use is, but rather you are telling the 
microprocessor where it can find the address of the 
data that you want. The indirect address will always 
be stored in zero page memory in two consecutive 
memory locations. The lower order byte of the ad¬ 
dress is stored in the first memory location, and the 
high order byte of the address is stored in the next 
location. This gives a 16 bit address, so that the data 
can be anywhere in the microprocessor’s normal ad¬ 
dress space. 

When you give an indirect addressing com¬ 
mand, the operand will be the address in zero page 
that contains the first byte of the address of the pair 
of memory locations where the appropriate address 
is stored. It is important to reserve enough space 
in zero page RAM to hold all of the indirect ad¬ 
dresses that you may be generating. 

At this point, indirect addressing should seem 
pretty easy to use, but there is a catch. The 6510 
does not have true indirect addressing abilities for 
data movement or arithmetic instructions. Instead 
there are two subclasses of indirect addressing 
available. These are: 

• Indexed Indirect X 

• Indirect Indexed Y 

We will look at the second one first because it 
is the most often used. As is implied by the name 
indirect indexed Y, this command is a combination 
of indirect addressing and indexed addressing. As 
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was mentioned earlier, the command will have the 
address of where the address may be found. After 
the microprocessor generates an address from the 
two zero page memory locations, the contents of the 
Y register is added to the address to form the final 
address. The data at this final address can then be 
accessed. If the value of the Y register is 0, the com¬ 
mand will act like a true indirect addressing com¬ 
mand. You must be sine that the Y register is set 
to the desired value before executing this command, 
or you will never be sure of where the data is com¬ 
ing from (or going to). 

In indexed indirect X addressing, the value of 
the X register is added to the zero page address of 
where the indirect address can be found. This new 
zero page address is then used to generate the final 
address of where the data can be located. If the X 
register is set to zero, this command will act like 
a normal indirect addressing command. The nor¬ 
mal use for this command is to use the X register 
as an index into a table of addresses located in zero 
page RAM. 

Implied Addressing 

Instructions that use implied addressing are on¬ 
ly one byte long. Instead of having to give an ad¬ 
dress in the instruction, the microprocessor decides 
on which one of its internal registers to use based 
on the instruction. For instance, the TAX instruc¬ 
tion will transfer the contents of the accumulator 


to the X register. This is known to the 
microprocessor without the need for any other ad¬ 
dresses. Because the microprocessor doesn’t need 
to calculate or load an address when using implied 
addressing, these instructions execute faster than 
any other type of instruction. 

Relative Addressing 

All of the branching instructions in the 6510 use 
the relative addressing mode. In this mode, instead 
of specifying an address for the destination of the 
branch, an offset from the current instruction to the 
destination of the branch it specifies in the operand. 
The offset is a one byte value. This gives a branch 
instruction the ability to branch over a range of 
+127 bytes to -127 bytes. Normally, you will use 
a label as the destination of the branch when writing 
your program, and the assembler will calculate the 
offset. 

Indirect Addressing 

There is only one instruction that uses indirect 
addressing in the 6510; it is an indirect jump. An 
indirect jump uses the principles of indirect address¬ 
ing that were discussed earlier. The main difference 
between the indirect jump and the other indirect in¬ 
structions is that a 2 byte value (16 bit) can be given 
as the address where the indirect data can be found. 
When using an indirect jump, the X and Y registers 
play no part in the address generation procedure. 
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Chapter 5 
Organizing Your Program 


Now that you have some understanding of what an 
assembler does and of the 6510 assembly language, 
you can begin to think about how to organize your 
program. All programs can be broken down as 
follows: 

• Macro library 

• System definitions 

• RAM definitions 

• Data definitions 

• Main program 

• Subroutines 

Although it may not be obvious at this point, this 
is a very logical outline. The macro library must be 
assembled first. Quite often there will be macros 
that define data areas. A macro must be defined 
prior to its first use. There is no penalty in terms 
of storage space for a macro that is not used. The 
source code for a complete macro library is given 
in the file MACLIB, Listing C-l in Appendix C. All 
of the macros in the file are described in detail in 
Appendix B. As they are given in the file, the 


macros will work with the Commodore Macro 
Assembler program. If you are using another 
assembler, you may have to modify them slightly 
before they can be used. 

Once the macros are in the system, the 
machine's hardware registers should be defined. 
This is the starting point when you try to learn how 
a new computer works, as it forces you to become 
familiar with the hardware. A full set of system 
definitions can be found in the file SYSDEF, Listing 
C-2 in Appendix C. The names that are assigned 
to the various hardware registers by this file are 
used throughout the book, so it would be a good idea 
to refer to the listing at some point. Most of the 
registers will be described in detail in a later chapter. 

The RAM that is to be used as variables for the 
program needs to be defined next. You will usually 
find that programming is easier if you define your 
variables before you start to write your program. 
These definitions do not have to be completed dur¬ 
ing the first sitting. As you progress in your pro¬ 
gram, you will find that you have not defined all of 
the RAM that you would like to use. Additions to 
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the RAM definitions tend to continue until the pro¬ 
gram is shipped or scrapped, whichever comes first. 

After all the hardware registers and RAM that 
you are planning to use have been defined, you are 
ready to start entering data. Where you put the data 
is a matter of available space and personal 
preference. If you are going to put data immediate¬ 
ly preceding the code, it would be a wise move to 
put a jump to the first instruction of your program 
before you define your first byte of data. In this way, 
you will always know what the starting address of 
your program is, no matter how the size of the data 
section may change. The data section will contain 
all the data that is not code. 

This may seem like quite a few preliminaries 
to the actual program, but all of the steps do need 
to be taken. The actual source code that you will 
be creating will be making constant references to 
all of the names and definitions that have been de¬ 
fined previously. 

When you are starting any program, especial¬ 
ly one in assembly language, it is important to break 
the program into a number of smaller routines. 
Quite often, the small routines can be individually 
tested and later merged to form a complete program. 
Also, small segments can be saved for use later in 
other similar programs so that you won’t have to 
start from scratch every time. Unless you write 
perfect programs every time, small program 
segments will be much easier to debug. If you write 
an entire program and then try to make it run, it 
can become quite difficult to determine where in the 
program the problem is. On the other hand, if you 
had tested all the small program segments before 
merging them into a complete program, the only 
problems that you might encounter should be in the 
interconnections between the program segments. 
Since you already know that all of the pieces of the 
program work, you should not have any difficulty 
finding the bugs. 


As you are writing your program, do not be 
alarmed if you realize that you have not defined 
something you need to use. Simply write what you 
have forgotten on paper and use it in the code as 
if it had been defined. Then, when you feel like tak¬ 
ing a break from the creative process, go back and 
insert your addition into the proper definition file. 
Until you try to assemble your program, the com¬ 
puter does not know or care what has or has not 
been defined. 

You may have been wondering why the 
subroutines should be placed at the end of your pro¬ 
gram. Unlike the macro library, any subroutine in 
your program will use a certain amount of memory, 
whether it is used or not. Because of this, any 
subroutine that is not used should be deleted so as 
not to waste memory space or the time that it takes 
the assembler to assemble the subroutine. 

By following this general outline, you will have 
a manageable and modular way with which to ap¬ 
proach the design of your program. Most 
assemblers have a command that allows you to chain 
together different parts of your program. If your 
assembler has the ability, you may find it desirable 
to write all of the different modules of your program 
as separate files, and then let the assembler link 
them together as it assembles the program. This 
has some advantages over creating one massive file. 
For instance, if you need to add a definition to your 
RAM definitions, you only need to load the file with 
your other definitions. If your disk drive is par¬ 
ticularly slow (as all Commodore 64 drives are), you 
will find a partitioning of your program quite a time 
saver. As your program progresses, the definitions 
and data areas will rarely need modifying. Keep¬ 
ing all of the parts of the program separate allows 
you to edit or print the part of the program that you 
are currently working on without having to deal 
with those parts of the program that have been 
tested and debugged. 
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Chapter 6 
Working with Interrupts 


In the Commodore 64 interrupts serve as a major 
source of timing and program control. The inter¬ 
rupts are normally used to maintain the real time 
clocks and the type ahead keyboard buffer. Inter¬ 
rupts can also be used to signal sprite collisions and 
inform the program when a specific scan line has 
been reached. 

To best understand what an interrupt is, con¬ 
sider a normal program. The microprocessor reads 
its instructions one at a time and executes them in 
order. Whatever it is told to do first, is done first. 
If there is a certain condition that makes it necessary 
to perform a certain operation immediately, this con¬ 
dition must be repeatedly checked throughout the 
program to ensure it is taken care of promptly. For 
example, a collision between a bullet and a player 
sprite should immediately initiate an explosion se¬ 
quence. In a normal program, you have to monitor 
the collision status register constantly and take ap¬ 
propriate action. 

The alternative is to let the hardware check for 
the collision. When a collision occurs, the VIC II 
chip can send an interrupt request to the 


microprocessor. If interrupts are enabled, the pro¬ 
cessor will execute an indirect jump through loca¬ 
tion $FFFE when it finishes executing its current 
instruction. Location $FFFE usually points to a 
point in ROM that has an indirect jump instruction 
for a point in RAM. In the Commodore 64, the 
RAM location that ultimately will direct the jump 
is $0314. If the address of your routine to initiate 
the explosion sequence is placed in locations $0314 
and $0315, this sequence will only be called on 
when a collision is detected. 

Using an interrupt for this purpose relieves the 
main program of scanning the collision register con¬ 
stantly. Because of this, less of a burden is placed 
on the microprocessor during the main program. 

Interrupts should be used for the part of your 
program that needs the highest priority in terms of 
microprocessor time. For instance, if you want to 
change the background color at a certain point on 
the screen, you need to use an interrupt. The VIC 
II chip can generate an interrupt on any scan line 
that you specify. This type of interrupt is called a 
raster interrupt. By using raster interrupts, your in- 
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terrupt routine can gain access to the processor at 
a specific (relatively) point on the screen. 

Interrupts are useful when the main program 
involves lengthy calculations or is going to be busy 
for quite some time. If you are trying to maintain 
animation while the main program is running, you 
need to use some form of interrupt to take control 
at least once every other screen. Otherwise, the 
animation will appear jerky. 

Before enabling your interrupt routine and 
thereby disabling the Commodore 64’s operating 
system, you should disable all other sources of in¬ 
terrupts in the machine. Once this is done, you can 
always find the cause of the interrupt easily. Most 
of the functions performed by Commodore’s 
operating system either are unnecessary in a game 
or can be done in a different manner. 

The KILL macro essentially shuts down all of 
the devices in the system capable of generating in¬ 
terrupts. Once the interrupts from these chips have 
been disabled, you can safely change the interrupt 
vectors to point at your interrupt routine. 

After the KILL macro is called, there are no in¬ 
terrupts generated in the system. This is a good 
time to change the addresses stored in the interrupt 
vectors. The nonmaskable interrupt vector 
(NMINV) should be changed to point at a return 
from interrupt (KTI) instruction. Nonmaskable in¬ 
terrupts are rarely, if ever, used in a game program. 
The maskable interrupt vector (CINV) should be 
changed to point at the first instruction of your in¬ 
terrupt routine. 

Listing C-3 in Appendix C is the source code 
for a program that uses a RASTER interrupt to 
change the background color of the screen in the 
middle of the screen. This is also a good time to en¬ 
sure that you are using your assembler properly. If 
you can successfully enter and run this short pro¬ 
gram, you should have no problem getting some of 
the longer programs to run later. The macro library 
and the system definitions that were defined earlier 
(Listings C-l and C-2) are inserted into the program 
by the .LIB directive of the assembler. An ex¬ 
ecutable version of this program is shown in Listing 
C-4. 

To run the executable form of this program 


enter the following commands: 

LOAD “DEMO.O”,8,1 

SYS 4096 

After setting up the system, the main program 
just loops through itself. The only way that any 
changes can occur is through interrupts. The first 
interrupt is generated at the mid point in the screen, 
as specified by the first RAST macro. After chang¬ 
ing the screen color to blue, this interrupt uses the 
RAST command to set an interrupt to occur at the 
bottom of the screen. Next, the address of the 
second interrupt is placed in the interrupt vector. 
The second interrupt (INTI) works in the same 
manner as the first, only it points to the first inter¬ 
rupt when it is done. By using two interrupt ser¬ 
vice routines in this manner, different things can be 
done on each half of the screen. 

You may have noticed that you can see the point 
on the screen where the colors change, and it seems 
to be moving. This occurs because the 
microprocessor must finish the instruction it is cur¬ 
rently working on before it can process the inter¬ 
rupt. Since an instruction may take from two to six 
machine cycles to execute, and the electron beam 
travels about three pixels per instruction cycle, the 
color can change in an 18 pixel area. This assumes 
that the VIC II chip is consistent about when it 
notifies the processor about the interrupt. Any tim¬ 
ing inconsistencies in the VIC II chip enlarges the 
area where the color changes. 

By adding a delay in the interrupt service 
routine before changing the background color, you 
can force the color change area to be in the border 
where it won’t show. 

After running this program, you can not reset 
the Commodore 64. By disabling the operating 
system, you have disabled the keyboard scan 
routines, effectively making the computer deaf to 
outside stimuli. When you have finished watching 
your new program and want to reset the machine, 
turn it off and back on again. 

Warning: Always be sure that you have saved your 
program and source code before trying to run a new 
program! 
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Chapter 7 
Technical Information 


Up until now, this book has dealt with concepts and 
generalities when referring to the hardware in the 
Commodore 64. This was important to get you 
used to the capabilities of the hardware without bog¬ 
ging you down with details. This chapter will go into 
the details of getting the computer to generate the 
effects you are after. This chapter will probably be 
the chapter to which you will refer most often when 
writing a game program. All of the information that 
you will need in order to program the VIC II chips 
and the SID chip will be explained in this chapter. 
After you have become familiar with the hardware 
in the Commodore 64, you will not need the full ex¬ 
planation of the hardware registers. When you are 
up to such a level, you will find it easier to use the 
listing of the SYSDEF file in Appendix C as a quick 
reference guide to the registers. 

Unless otherwise noted, all references to ad¬ 
dresses in this chapter use hexadecimal notation. 
The names that have been assigned to the registers 
are the standard names that have been defined in 
the hardware definition listing, SYSDEF (Listing 
C-2 in Appendix C). By using this naming conven¬ 


tion for the registers, you will begin to gain familiari¬ 
ty with the register names as they are used in the 
assembler. All of the names are made up of 6 
characters or less, so no matter what type of 
assembler you are using, the same names will be 
acceptable. 

Macros that supply many of the functions 
described below have been provided. Descriptions 
of all of the macros can be found in Appendix B, 
and Listing C-l in Appendix C provides the source 
code. The macros may use a few more instructions 
to perform the function than would be required if 
you were to provide the data yourself. They do have 
advantages, however. Your program will be easier 
to understand if you use the macros, as there will 
be a recognizable name given to the macro as op¬ 
posed to a sequence of assembly language in¬ 
structions. 

COMMODORE 64 ADDRESS SPACE 

As you know, inside the Commodore 64 is a 
6510 microprocessor, which controls the machine. 
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It uses a 16 bit address bus allowing it to access 
2^16 or 65536 bytes of memory. This is all the 
memory that can be accessed at one time. For¬ 
tunately, as mentioned briefly before, through a 
technique called bank switching , different types of 
memory can be switched into or out of this address 
space. Through the use of bank switching, the 8K 
BASIC ROM can be accessed instead of 8K of 
RAM. The Commodore 64 switches other sections 
of RAM with ROM, and also switches an area of 
RAM with some hardware registers, such as the 
VIC II chip. 

When choosing the appropriate memory map 
for your program, you must decide which of the 
functions provided by the Commodore 64 you will 
be using. For instance, if you do not need BASIC, 
you can switch the BASIC ROM out of the memory 
space. Doing so will give you 8K of RAM that you 
would not otherwise be able to use. 

Some of the memory maps available to you will 
allow you to switch the 4K I/O space at $D000 with 
4K of RAM. What this means is that you will no 
longer have access to the hardware registers at these 
locations. When it becomes necessary to change any 
of the values in one of these registers, you will need 
to switch the I/O space back into the RAM space. 
This is generally more trouble than it is worth, 
unless you desperately need the extra memory. 

You also have the option of switching out the 
8K KERNAL ROM. In most cases, you will not be 
using any of the KERNAL routines. If this is the 
case, there is no reason to keep it in memory. 8K 
of RAM can be switched into the space where the 
KERNAL ROM was. 

Caution: All interrupts in the system should be 
shut down before the KERNAL ROM is switched 
out of memory. The six bytes of memory from 
$FFFA to $FFFF in the KERNAL contain the vec¬ 
tors for the interrupts. After the KERNAL has been 
switched out, new interrupt vectors need to be 
stored in RAM. 


MEMORY CONTROL AND MAPPING 

There are five control lines that control the bank 


switching of the different memory areas. Three of 
these lines are controlled by the microprocessor us¬ 
ing its internal I/O port. 

The three internal control lines are the least 
significant three bits at address $0001. This is the 
hardware I/O port of the 6510 processor. Data can 
be written to this port just as it can be written to 
any other memory location. Bits 0 and 1 are used 
to select from the four primary memory maps that 
are available. Bit 2 selects whether the I/O devices 
or the character generator ROM will be addressable 
by the microprocessor in the range of addresses 
from $D000 to $DFFF. Bit 2 has no effect on the 
system when the memory map with 64K of RAM 
accessible is selected. The remaining two control 
lines are internally pulled high when there is no car¬ 
tridge plugged into the computer and can be ignored 
for a disk based program. 

Figure 7-1 shows all of the memory mapping 
possibilities. 


FFFF 

8K KERNAL SOM 


or 

£000 

RAM 

D000 

4K I/O or RAM or ROM 

COOO 

4K RAM 


8K BASIC ROM 


or RAM or 

AOOO 

ROM PLUG-IN 


8K RAM 


or 

8000 

ROM PLUG-IN 

AAAA 

32K SAM 


Fig. 7-1. Memory mapping options chart. 
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The memory maps in Figs 7-2, 7-3, 7-4, and 7-5 can 
be selected through software. 

GRAPHICS MEMORY LOCATIONS 

Although the Commodore 64 has 64K of 
memory, the VIC chip can only reference 16K of 
memory at any one time. Fortunately, you can 
change which of the four 16K blocks of memory in 


the computer the VIC chip will be able to use. When 
the Commodore 64 is powered up, bank 0 of 
memory ($0000-$3FFF) is selected. If you wish to 
change the bank of memory that the VIC chip will 
use, you must set the least significant two bits of 
$DD00 to the value that represents the desired 
bank. Before doing so, you must set bits 0 and 1 
of $DD02 to 1. This will select the control bits that 



Fig. 7-2. 64K RAM memory map. 
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Fig. 7-3. 52K RAM memory map. 


control-memory select to outputs. The BANK 
macro will select the proper bank for you. If you 
want to change the bank yourself, use the informa¬ 
tion in Thble 7-1 for the appropriate values: 


Table 7-1. The Values to Use When Selecting 
the Bank of Memory the VIC Chip Will Use. 


VALUE 

BANK# 

MEMORY RANGE ADDRESSED 

3 

0 

$0000-$3FFF 

2 

1 

$4000-$7FFF 

1 

2 

$8000-$BFFF 

0 

3 

$C000-$FFFF 


STANDARD TEXT MODE 

When the Commodore 64 is first tinned on, it 
owers up in its standard text mode. When in this 
mode, the screen is arranged as 40 characters by 
25 lines. This gives a total of 1000 characters that 
can be displayed on the screen at any one time. The 
character to display in each position can be found 
in the 1000 bytes of RAM starting at $0400. If you 
want, you can instruct the VIC chip to use a dif¬ 
ferent area of memory to find the text to be 
displayed. The upper four bits of the VIDBAS 
register ($D018) control where the VIC chip will 
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find the text. Text memory will always be found on 
$0400 boundaries. 

Each byte in the text memory area is used as 
an index into a character generator section of 
memory. Since a byte can have 256 values, each 
position on the screen can display one of 256 pat¬ 
terns. When the Commodore 64 is powered up, the 
graphics information that the text memory 


references is in the character generator ROM. The 
VIC chip can be instructed to use a different area 
of memory as the character generator by changing 
the lower four bits of the VIDBAS register ($D018). 
This section of memory will be referred to as 
graphics memory, as the information can be of any 
type of graphics, not necessarily text. 

The Commodore 64 has a built-in character 



Fig. 7-4. 60K RAM memory map with no KERNAL ROM. 
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Fig. 7-5. The default memory map with 42K RAM. 


generator ROM, which is physically at 
$D000-$DFFF. You may have noticed that this is the 
same address range where the hardware registers 
in the Commodore 64 are. This is possible only 
because the hardware registers are not available to 
the microprocessor at the same time as the 
character generate ROM is. Bit 2 of the I/O port at 
$01 controls whether the ROM or hardware 


registers will be available to the microprocessor. 
When this bit is set to a 1, the hardware registers 
will be available. When this bit is set to 0, the 
character generator ROM can be read by the 
microprocessor. The VIC chip does not see the 
character generator at this address, however. The 
VIC chip has been tricked into seeing the character 
generator from $1000-$1FFF. The VIC chip also 
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sees an image of the character generator ROM from 
$9000-$AFFF. Notice that the VIC chip can only 
see an image of the character generator when in 
banks 0 and 2 of memory. The microprocessor does 
not see the character generator in the same place 
that the VIC chip does, so there is no conflict with 
the microprocessor when using one of the areas in 
memory to store data that the VIC chip thinks is 
the character generator. You will normally choose 
either bank 1 or 3 for your graphics, so that the im¬ 
age of the character generator does not get in your 
way. If you do need to use text in your program, you 
can either copy data out of the character generator 
or create your own character set. 

The TXRAS macro can be used to change the 
base address where the text will be located. Similar¬ 
ly, the GRABAS macro can be used to change the 
base address of graphics memory. It is important 
to remember that the text and graphics base ad¬ 
dresses must be added to the bank that is current¬ 
ly selected in order to find the absolute address in 
memory where the data will be found. For exam¬ 
ple, if you had selected bank 1 of memory 
($4000-$7FFF) and the text base address was 
$0400, the text data would be found at $4400. If you 
want to change the base address of the registers 
yourself, the values to use can be found in Thble 7-2. 
When changing a value for the TEXT mode, only 
the upper bits should be changed in the VIDBAS 
register. Similarly, when changing a graphics base 
address, only the lower bits should be changed. A 
dash indicates a don't care condition. You must 
remember to add the BASE address register to the 
addresses to find the real address. 

COLOR MEMORY 

As discussed earlier, when in the text mode, the 
screen is arranged as 25 lines of 40 characters. Each 
of the characters can be one of 256 different pat¬ 
terns. In addition to being able to select the 
character to be displayed at each position on the 
screen, you can also select the color that you would 
like each character to be. The Commodore 64 pro¬ 
vides 16 colors that can be used. There is an area 
in memory that is reserved to hold the color infor¬ 
mation. This section of memory is called the color 


Table 7-2. The Values To Use To 
Change the Base Address for Text or Graphics. 


VIDBAS VALUE 

TEXT BASE ADDRESS 

Upper Bits 

$0- 

$0000 

$i- 

$0400 

$2- 

$0800 

$3- 

$0C00 

$4- 

$1000 

$5- 

$1400 

$6- 

$1800 

$7- 

$1C00 

$8- 

$2000 

$9- 

$2400 

$A- 

$2800 

$B- 

$2C00 

$C- 

$3000 

$D- 

$3400 

$E- 

$3800 

$F- 

$3C00 

VIDBAS VALUE 

GRAPHICS BASE ADDRESS 

Lower Bits 

$-0 

$0000 

$-2 

$0800 

$-4 

$1000 * 

$-6 

$1800 * 

$-8 

$2000 

$-A 

$2800 

$-C 

$3000 

$-E 

$3800 

* In BANK 0 and 2, ROM images will appear here. 


RAM . Color RAM starts at $D800 and continues 
to $DBE7. Unlike the normal RAM used in the 
Commodore 64, color RAM is made up of nibbles 
rather than bytes. When you read a value out of col¬ 
or ram, only the least significant four bits are valid. 
You will read an eight bit value, but the data in the 
upper four bits is not predictable. Quite often, you 
must mask the upper four bits before using data 
from the color RAM. 

Color memory does not move, and the VIC chip 
cannot use a different section of memory for the col¬ 
or information. The MVCOL macro will fill color 
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RAM with a single color. For instance, if you wanted 
all of the text tobe white,you would enter “MVCOL 
WHITE.” The text memory and color RAM are 
treated differently by the different graphics modes. 
If your picture doesn’t look like you expect, check 
to be sure that the proper graphics mode has been 
selected. 


CUSTOM CHARACTER SETS 

Although the Commodore 64 has a built in 
character set, you will probably find that set limiting 
in what it allows you to do. The text mode can be 
used for quite a few different types of games if you 
redefine the character set. You can build up figures 
that are larger than one character size by placing 
the different pieces of the figure in adjacent loca¬ 
tions. This gives you quite a bit of flexibility in us¬ 
ing graphics as long as you define your own 
character set. 

Each character is defined in memory as an ar¬ 
ray of 8 by 8 bits. This is stored as eight sequential 
bytes. Each byte has eight bits, and each bit 
represents one pixel on the screen. If a bit is on, 
the corresponding pixel on the screen will be turn¬ 
ed on in the character color. If the bit is off, the 
background color is used for that pixel. The value 
in the text RAM is used as a lookup into the 
graphics RAM to choose which set of eight bytes 
will represent a character. If you decide to make 
your own character set, you will have to define any 
text characters that you may need as well as your 
graphics figures. Once you instruct the VIC chip to 
get its graphics data from RAM, it will no longer 
be able to use the character generator ROM. 

Using a machine language monitor, you can 
enter the data for your character set into RAM. 
When you are finished, you should save your new 
set to the disk for later use. The first 8 bytes in your 
character set will be displayed if you place a 0 into 
a text memory location (assuming that you had 
previously instructed the VIC chip to get its 
graphics information from the place in memory 
where your new character set was placed). Your 
character set must begin on a multiple of $0800 in 
the current bank. The character set may not be 


placed in one of the locations where the VIC chip 
can see the character generator ROM. 

MULTICOLOR MODE 

Tb this point, all of the graphics in the text mode 
have been able to use only two colors for each 
character position on the screen. Normally a video 
game will use many more than two colors. Tb allow 
more colors to be displayed in a given area on the 
screen, the Commodore 64 has a multicolor mode 
that can be selected. In this mode, the character can 
use the character color and the colors in BCOLO 
($D021—the background color), BCOL1 ($D022), or 
BCOL2 ($D023). Using this mode, each pixel in a 
character location can be one of 4 colors. Unfor¬ 
tunately, you have to sacrifice 1/2 of the horizontal 
resolution to use this mode. This is usually a 
reasonable sacrifice considering how much more 
color can be used. 

In order to turn on the multicolor mode, you 
must set bit 4 of the XSCRL® ($D012) or use the 
MULTON macro. To turn off the multicolor mode, 
you must clear bit 4 of the XSCRL register or use 
the MULTOF macro. In the text mode, the 
multicolor mode is selected individually for each 
character position on the screen. If the color in col¬ 
or RAM for a given character position is less than 
8, that character position will be in the standard text 
mode. If the color in color RAM is 8 or greater, that 
character position will be in the multicolor mode. 
This allows you to mix standard and multicolor 
modes on the same screen. 

As stated earlier, you sacrifice 1/2 of the 
horizontal resolution of the normal text mode when 
you select the multicolor mode. This means that 
each character will be made up of an array of 4 by 
8 pixels. It still takes 8 bytes to define a character, 
but instead of each bit corresponding to a pixel on 
the screen, each PAIR of bits represents one of 4 
registers to use to find the color for the bit pair. The 
following chart shows the correlation between bit 
pairs and registers. 

Bit Pair Register 

00 BCOLO 

01 BCOL1 
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Bit Pair Register 

10 BCOL3 

11 Lower 3 bits 

of COLOR RAM 

EXTENDED BACKGROUND COLOR MODE 

In certain applications where you do not need 
a very large character set (less than 65 characters), 
you can use more colors than the standard text mode 
will allow by using the extended background color 
mode. In this mode, you do not sacrifice any resolu¬ 
tion to gain extra colors; you only sacrifice the 
number of characters available from your character 
set. You can control both the foreground color (us¬ 
ing the color RAM) and the background color of 
each character. The two most significant bits of the 
character code are used to select a background col¬ 
or from one of four registers, BCOLO to BCOL3. 
Because of this, only the first 64 characters from 
your character set can be used. 

The extended background color mode is ena¬ 
bled by setting bit 6 of the YSCRL ($D011) register. 
This mode can be turned off by clearing bit 6 of the 
YSCRL register. The following chart shows the rela¬ 
tionship between the most significant two bits of the 
character code and the background color: 

Bit Pair Register 

00 BCOLO 

01 BCOL1 

10 BCOL2 

11 BCOL3 

BIT MAPPING 

Even though the various text modes available 
to you in the Commodore 64 provide many different 
options for displaying graphics, they still restrict you 
to using predefined shapes. For the majority of 
video game applications, you will be unable to use 
a text mode. The Commodore 64 has a high resolu¬ 
tion bit mapped graphics mode that allows you to 
control each pixel on the screen individually. The 
display has a resolution of 320 pixels horizontally 
by 200 pixels vertically. This gives a total of 64000 


pixels that can be controlled on the screen. Since 
each pixel is represented by a bit in graphics 
memory, 8000 bytes of graphics memory are re¬ 
quired to represent the display. 

There are two different types of bit mapped 
modes available on the Commodore 64. They are: 

• Standard bitmapped mode: 320H by 200V, two 
colors per 8 by 8 group of pixels. 

• Multicolor bitmapped mode: 160H by 200V, four 
colors per 8 by 8 group of pixels. 

To turn on the standard bitmapped mode, you 
must set bit 5 of the YSCRL register. The GRAPH 
macro will perform this function for you. Tb turn 
off the bitmapped mode, you must clear bit 5 of the 
YSCRL register. You can use the TEXT macro to 
perform this function. 

In the standard bitmapped mode, the colors for 
each 8 by 8 group of pixels are stored in text 
memory. The high 4 bits control the color of a pix¬ 
el if its associated memory bit is on, while the lower 
4 bits specify the color of a pixel if its bit is off. Color 
RAM is not used in the standard bitmapped mode. 
Table 7-3 shows how the bytes of graphics memory 
are organized with regard to the screen. This se¬ 
quence is repeated for all 25 rows. 


Table 7-3. The Bytes of Graphics 
Memory as Organized with Regard to the Screen. 


ROW 0 

0 

$8 

$10 

$18 .... 

.... $138 


1 

$9 

$11 


$139 


2 

$A 

$12 


$13A 


3 

$B 

$13 


$13B 


4 

$C 

$14 


$13C 


5 

$D 

$15 


$13D 


6 

$E 

$16 


$13E 


7 

$F 

$17 


$13F 

ROW 1 

$140 

$148 

$150 

$158 . . . . 

.... $278 


$141 

$149 

$151 


$279 


$142 

$14A 

$152 


$27A 


$143 

$14B 

$153 


$27B 


$144 

$14C 

$154 


$27C 


$145 

$14D 

$155 


$27D 


$146 

$14E 

$156 


$27E 


$147 

$14F 

$157 


$27F 
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Multicolor Bitmapped Mode 

Tb turn on the multicolor bit mapped mode, you 
must first turn on the bit mapped graphics mode 
as shown above. Then you must set bit 5 of the 
YSCRL register. You can turn off the multicolor 
mode by clearing bit 5 of the YSCRL register. The 
macros MULTON and MULTOF can be used to 
turn on and off the multicolor modes. 

In the multicolor mode, four colors can be 
displayed in each 4 by 8 group of pixels. Each byte 
in graphics memory is broken down into 4 bit pairs. 
Each bit pair specifies where the color information 
will be found for each pixel. In addition to the two 
colors that are defined in text memory, the color 
RAM is used in this mode to hold one more color. 
The fourth color is the background color that is 
stored in BCOLO ($D021). The correspondence be¬ 
tween the bit pairs in graphics RAM and where the 
color is found is shown in the following chart: 

Bit Pair Color 

00 BCOLO 

01 UPPER NIBBLE OF 

CHARACTER RAM 

10 LOWER NIBBLE OF 
CHARACTER RAM 

11 COLOR RAM 

SPRITES 

A sprite is a small moveable object block that 
can move independently of the background 
graphics. The VIC chip can display eight sprites on 
the screen at any one time. Sprites can be displayed 
on any one of the display modes, and they will look 
the same in all of them. You can have up to 256 dif¬ 
ferent sprites defined at any one time, but only eight 
can be displayed at the same time. The sprite to be 
displayed can be changed by changing a one byte 
pointer, so animation can be easily performed by 
quickly switching through a few different sprite pat¬ 
terns. Sprites can be moved very smoothly by simply 
giving the VIC chip the X and Y coordinates of the 
upper left comer of the sprite. 

Sprites have different display priorities. That 
means that the sprite with a higher priority will ap¬ 


pear to move in front of a sprite with a lower priori¬ 
ty. This can be used to give the illusion of three 
dimensional movement. The priority of a sprite to 
the background graphics is individually selected for 
each sprite. If the background is given priority, the 
sprite will appear to move behind the background 
graphics. For instance, if a tree was being displayed 
in the bit mapped graphics mode, and a sprite in 
the shape of a dog was to move past the tree, the 
dog would appear to be moving behind the tree. 

Each sprite is a block 24 pixels horizontally by 
21 pixels vertically. The pixels that are set to one 
use 1 of the 16 available colors. The pixels that are 
set to zero allow the background color to show 
through (are transparent). Like the other graphics 
modes, a sprite can be selected to be in the 
multicolor mode, giving it a resolution of 12 by 21 
in three colors plus transparent. Wherever a sprite 
is transparent, whatever is behind the sprite will 
show through. 

For those times when a larger sprite is 
necessary, the VIC chip has the option of doubling 
the horizontal size, the vertical size, or both. You 
will not increase the detail available in your sprite 
by using one of the multiply options, only the size. 
When a sprite is expanded, each of the pixels is 
twice the size of the pixels in a normal sprite. 

Sprite Pointers 

Once a sprite has been defined, the VIC chip 
needs to be told where to find the pattern. The sprite 
definition must be in the currently selected bank 
of memory for it to be displayed. Since each sprite 
definition takes up 64 bytes, a sprite definition will 
always start on a $0040 boundary in memory. 

A 16K bank of memory can hold 256 sprite 
definitions, so it will only require one byte to tell 
the VIC chip which sprite to display. The sprite 
pointer is a number which, when multiplied by 64, 
will give the starting address of the sprite defini¬ 
tion. Sprite definitions may not be placed in a sec¬ 
tion of memory where the VIC chip sees an image 
of the character generator ROM. 

The VIC chip will read the eight sprite pointers 
from the last eight bytes of the IK of text memory, 
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an offset of $03F8 from the text base address. Since 
only 1000 out of 1024 bytes of text memory are 
used to display characters on the screen, the sprite 
pointers will not interfere with screen graphics. For 
example, since the default setting of the text 
memory is at $0400, the first sprite pointer will be 
$07F8. 

Sprite Controls 

For most of the sprite control registers, each bit 
in the register corresponds to one of the sprites. For 
example, bit 0 represents sprite 0, bit 1 represents 
sprite 1, and so on. The rest of the sprite controls 
require a value (such as a vertical location), so there 
is one register for each sprite. 

Enabling a sprite. Before a sprite can be 
seen, it must be enabled. The register SPREN 
($D015), has an enable bit for each sprite. If the bit 
is set, the sprite will be enabled. The sprite will only 
be seen if the X and Y positions are set to the visi¬ 
ble portion of the screen. A sprite can be disabled 
by clearing the appropriate bit. 

Setting the sprite color. There are eight 
registers that are used to hold color information, one 
for each sprite. Any of the 16 available colors may 
be selected for each sprite. Each bit that is set in 
the sprite definition will cause a pixel to be displayed 
in the sprite color. If the bit is clear, the pixel will 
be transparent. The sprite color registers are: 


Name 

Address 

SPRCL0 

$D027 

SPRCL1 

$D028 

SPRCL2 

$D029 

SPRCL3 

$D02A 

SPRCL4 

$D02B 

SPRCL5 

$D02C 

SPRCL6 

$D02D 

SPRCL7 

$D02E 


Setting the multicolor mode. The 

multicolor mode can be individually selected for 
each ($D01C)/sprite by setting the appropriate bit 
in the MLTSP ($D01C) register. Setting a bit will 
enable the multicolor mode, clearing the bit will 


disable the multicolor mode. When the multicolor 
mode is enabled, the horizontal resolution drops 
from 24 pixels across to 12 pixels. Each pair of bits 
in the sprite definition is treated as a bit pair, whose 
value determines which of the four colors will be 
selected for the pixel. Table 7-4 shows the relation¬ 
ship between the bit pairs and the color registers. 


Table 7-4. The Relationship Between the Bit 
Pairs and the Color Registers in the Multicolor Mode. 


Bit Pair 

Description 

00 

TRANSPARENT, SCREEN COLOR 

01 

SPRITE MULTICOLOR REGISTER #0 


($D025) 

10 

SPRITE COLOR REGISTER 

11 

SPRITE MULTICOLOR REGISTER #1 


($D026) 


Using the sprite multipliers. Each of the 
sprites can be expanded in either the X or Y direc¬ 
tion. When a sprite is expanded, each pixel is 
displayed as twice the normal size in the direction 
of the expansion. The resolution of the sprite does 
not increase, only the size. 

To expand a sprite in the X direction, the ap¬ 
propriate bit must be set in the SPRXSZ ($D01D) 
register. To return the sprite to its normal size, clear 
and bit. 

The expansion of a sprite in the Y direction is 
done in the same way as the X expansion. You must 
set the appropriate bit in the SPRYSZ ($D017) 
register to expand the sprite. The sprite can be 
returned to its normal size by clearing its bit in the 
SPRYSZ register. The sprite can also be expanded 
in both the X and Y directions by setting its bit in 
both registers. 

Positioning sprites. Each sprite can be posi¬ 
tioned independently anywhere on the visible 
screen and off the visible screen in any direction. 
Since the screen is 320 pixels wide, it takes more 
than one byte to specify a horizontal position. Each 
sprite has its own X position register and Y posi¬ 
tion register, and a bit in an extra most significant 
bit register. These registers are shown in Table 7-5. 
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The location specified by the registers is the posi¬ 
tion where the upper left comer of the sprite will 
appear. 


Table 7-5. The Position Registers for the Sprites. 


Address 

Name 

Description 

$D000 

SPROX 

SPRITE 0 HORIZONTAL 

$D001 

SPROY 

SPRITE 0 VERTICAL 

$D002 

SPR1X 

SPRITE 1 HORIZONTAL 

$D003 

SPR1Y 

SPRITE 1 VERTICAL 

$D004 

SPR2X 

SPRITE 2 HORIZONTAL 

$D005 

SPR2Y 

SPRITE 2 VERTICAL 

$0006 

SPR3X 

SPRITE 3 HORIZONTAL 

$DO07 

SPR3Y 

SPRITE 3 VERTICAL 

$0008 

SPR4X 

SPRITE 4 HORIZONTAL 

$0009 

SPR4Y 

SPRITE 4 VERTICAL 

$D00A 

SPR5X 

SPRITE 5 HORIZONTAL 

$D00B 

SPR5Y 

SPRITE 5 VERTICAL 

$D00C 

SPR6X 

SPRITE 6 HORIZONTAL 

$D00D 

SPR6Y 

SPRITE 6 VERTICAL 

$D00E 

SPR7X 

SPRITE 7 HORIZONTAL 

$D00F 

SPR7Y 

SPRITE 7 VERTICAL 

$D010 

XMSB 

MOST SIGNIFICANT BIT 
REGISTER 


The value placed in the Y position register will 
specify the vertical position of the sprite on the 
screen. This value may be up to 255. For an unex¬ 
panded sprite to be completely visible, the Y value 
must be between $32 and $E9. Any other values 
will place the sprite partially off the screen. 

Whatever value is placed in the X position 
register is the least significant 8 bits of a 9 bit value. 
Each sprite has a ninth bit in the XMSB ($D010) 
register. An unexpanded sprite will be completely 
visible if the 9 bit X value is greater than $18 and 
less than $140. The HINC and HDEC macros can 
be used to perform 9 bit increments and decrements 
of the X position. 

Table 7-6 shows the screen coordinates for ex¬ 
panded and unexpanded sprites to be fully visible 
on the screen. Any sprite positions outside of 
these limits will be partially or fully off of the 
screen. This provides an easy way to reveal a 
sprite gradually. 

Assigning sprite priorities. As mentioned 
before, each sprite has a display priority with 


Table 7-6. The Screen Coordinates at which 
Normal and Expanded Sprites Will Be Fully Visible. 


POSITION 

X 

Y 

X EXP 

Y EXP 

UPPER LEFT 

$18 

$32 

$18 

$32 

UPPER RIGHT 

$140 

$32 

$128 

$32 

i. LOWER LEFT 

$18 

$E5 

$18 

$D0 

LOWER RIGHT 

$140 

$E5 

$128 

$D0 


respect to the other sprites and to the background. 
You can create a three dimensional effect by allow¬ 
ing different sprites to pass in front of each other. 
The priority of one sprite to another is predeter¬ 
mined by the VIC chip. Sprite 0 has the highest 
priority, meaning that it will appear to be in front 
of all other sprites. Sprite 7 has the lowest priority 
of all the sprites. 

Each sprite can be individually selected to either 
have a higher priority than the background or a 
lower priority. If the sprite’s bit in the BPRIOR 
($D01B) register is clear, the sprite will appear to 
pass in front of the background. When the bit for 
the sprite is set in the BPRIOR register, the sprite 
will appear to move behind the background image 
and in front of the background color. Because sprites 
can have transparent as one of their colors, any 
sprite that passes behind a higher priority sprite 
with transparent in it will show through in the 
transparent areas. 

COLLISION DETECTION 

The VIC chip can detect collisions between 
sprites and also between a sprite and the 
background. The VIC chip will defect collisions be¬ 
tween the nontransparent portions of sprites. 

When a collision between two sprites occurs, 
their bits are set in the SSCOL ($D01E) register. 
The data in the SSCOL register will stay valid un¬ 
til the byte is read. After the register is read, the 
data will be cleared, so it is important to store the 
data somewhere before analyzing it. The VIC chip 
will detect a collision even if the sprites are off the 
screen. One thing that should be noted is that the 
SSCOL register will only tell you which sprites are 


32 



involved in collisions, not which sprite hit which 
sprite. If you are multiplexing sprites, the data in 
the SSCOL register may be useless. 

Sprite to background collisions are handled in 
almost the same way. The SBCOL ($D01F) register 
will detect a collision between the nontransparent 
portion of a sprite and the background. In a 
multicolor screen mode, the bit pair 01 is considered 
transparent for collision detection. Like the SSCOL 
register, the data is cleared after reading it. 

BLANKING THE SCREEN 

The entire screen can be blanked to the border 
color by clearing bit 4 of the YSCRL register. The 
screen can be turned back on by setting bit 4 of the 
YSCRL register. Blanking the screen does not 
disrupt any data on the screen. When the screen is 
blanked, your program will run slightly faster 
because the VIC chip doesn’t need to fetch any data 
from memory. 

THE RASTER REGISTER 

The VIC chip keeps track of which scan line the 
electron beam is currently on. Since there are more 
than 255 scan lines in one TV frame, this will be 
a 9 bit value. The least significant 8 bits of the cur¬ 
rent scan line can be read by reading the RASTER 
($D012) register. The ninth bit can found in bit 7 
of the YSCRL register. 

You can write a 9 bit value to the RASTER 
register and bit 7 of the YSCRL register. When the 
scan line reaches the value that you stored, bit 0 of 
the VIRQ ($D019) register will be set. If bit 0 of 
the VTRQM ($D01A) register is set, an interrupt will 
be sent to the microprocessor. You must remember 
to store a ninth bit when storing a RASTER 
number, or the comparison will not take place. The 
RAST macro will set the 9 bit raster number for 
you. 

VIDEO INTERRUPTS 

Different conditions within the VIC chip can 
generate interrupts. The interrupt status can be read 
by reading the video interrupts register, VIRQ 
($D019). The bits have the following meanings: 


Bit Type of Interrupt 

0 RASTER 

1 SPRITE TO BACKGROUND 
COLLISION 

2 SPRITE TO SPRITE COLLISION 

3 LIGHT PEN 

7 SET ON ANY ENABLED 

INTERRUPT 

Once an interrupt bit has been set, a 1 must be 
written to that bit position in order to clear it. This 
allows you to process interrupts one at a time, 
without having to store the data elsewhere. 

Interrupts will only be sent to the 
microprocessor if the corresponding bit in the video 
interrupt mask register, VIRQM ($D01A), is set. You 
will still be able to read the interrupts from the 
VIRQ register, but if the appropriate bit in the 
VIRQM register is not set, no interrupts will be 
generated. See the section on using interrupts for 
more information on using interrupts properly. 

SCROLLING 

One of the most advanced features of the VIC 
chip is its ability to smoothly scroll the screen in 
either the X or Y direction. The VIC chip can scroll 
the screen using hardware, freeing the 
microprocessor from the task of finely scrolling the 
screen. When the screen needs to be scrolled, the 
VIC chip can be instructed to scroll the screen 
within a range of 8 pixels in the X direction, the Y 
direction, or both. 

The least significant three bits of the YSCRL 
($D011) register control the amount of vertical 
scrolling. Since this register is also used for a 
number of control functions, the register should be 
read before it is changed. The XSCRL ($D016) 
register works in the same way as the YSCRL 
register except that the XSCRL register controls the 
amount of horizontal scrolling. When changing 
either of these registers, the lower 3 bits should be 
masked to 0, and the number of pixels to be 
scrolled should be OR’d to the new value. The result 
of this procedure can then be stored back into the 
register. 
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The following is a routine that can be used to 
change the value of the YSCRL or XSCRL register. 
This example shows how to set the YSCRL register 
to a scroll value of 7 without disturbing the value 
of the upper bits of the register. 


LDA 

YSCRL 

;LOAD THE DATA 

AND 

#$F8 

;MASK THE LOWER 3 BITS 

ORA 

#$07 

;SCROLL 7 PIXELS 

STA 

YSCRL 

;STORE THE NEW VALUE 


As the scrolling value goes from 0 to 7 in the 
YSCRL register, the screen will scroll down. As the 
value in the XSCRL register goes from 0 to 7, the 
screen will scroll to the right. 

When scrolling the screen, you will usually want 
to expand the border area of the screen. This will 
give you an area to place the new graphics to be 
scrolled onto the screen where they will not be seen. 
The VIC chip has two controls that will expand the 
border. The first of these is a 38 column mode. This 
mode can be selected by clearing bit 3 of the 
XSCRL register. The VIC chip can be returned to 
the 40 column mode by setting bit 3 of the XSCRL 
register. In the 38 column mode, one column on the 
right side of the screen and one column from the 
left side of the screen are covered by the border col¬ 
or. This will give you a buffer area where changes 
to the screen will not be seen. 

The other border expansion option is useful for 
vertical scrolling. By clearing bit 3 of the YSCRL 
register, when the vertical scroll is set to 3, half of 
the top row and half of the bottom row will be 
covered by the border. The VIC chip can be re¬ 
turned to the normal 25 row mode by setting bit 3 
of the YSCRL register. When the vertical scroll is 
set to 0, the top line will be entirely covered by the 
border. When the vertical scroll is set to 7, the bot¬ 
tom line of the screen will be entirely covered by 
the border. 

Once you have reached a maximum scroll value 
in the X or Y direction, you will have to shift each 
character on the screen in the direction of the scroll 
in order to continue scrolling. After moving all of 
the characters on the screen, you can reset the fine 


scrolling registers to their minimum value and con¬ 
tinue to use the hardware registers to scroll the 
screen. 

There are a number of things that must be 
taken into account when writing a scrolling program. 
In order for the screen to appear to be in continuous 
smooth motion, the routine that will shift each 
character must be extremely fast. Also, if you are 
using a number of different colors in color RAM, 
each character in color RAM must be moved in the 
direction of the scroll at the same time as the 
characters in screen memory. If you do not need to 
scroll the entire screen, your program can be much 
shorter and will run faster. If your program does not 
run fast enough, you will see breaks in your graphics 
where the characters that have been scrolled are ad¬ 
jacent to characters that have not yet been scrolled. 

If possible, your routine should be fast enough 
to reposition the entire screen in one screen update 
time (1/60 of a second). You can get by with a slower 
routine if you scroll your screen memory into a dif¬ 
ferent area of memory than the one that is current¬ 
ly being displayed. This must be completed before 
the fine scrolling register reaches its limit, so when 
the entire screen needs to be repositioned, it will 
be ready. Instead of repositioning the entire screen 
at that point, which would have to be done within 
1/60 of a second, all you need to do is to use the 
TXBAS or GRABAS macro to instruct the VIC chip 
to get the data from the area that has already been 
repositioned. The macro that you will use depends 
on the graphics mode that the screen is in. 


JOYSTICKS 

At some point, you will want to allow the player 
to have control over his character in the game. The 
most common form of input to a video game is a 
joystick. The Commodore 64 has two input ports 
that can be used for joysticks. By setting both 
DDRA ($DC02) and DDRB ($DC03) to $00, the two 
ports will be configured as inputs. Once the ports 
have been configured, the data from the joysticks 
can be read from JOY1 ($DC00) or JOY2 ($DC01). 
Bit 4 of a joystick port represents the fire button 
on that joystick. If that bit is clear, the fire button 
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is depressed. The lower five bits of a joystick port 
represent the direction of the joystick as shown 
below: 

Bit Direction 

0 UP 

1 DOWN 

2 LEFT 

3 RIGHT 

4 FIRE BUTTON 


nient or manageable to have a bit set representing 
a closed switch, the NOT macro can be used to in¬ 
vert the data. Before using the joystick data as any 
type of an index into a table of data, you must mask 
the unused bits in the register. You will normally 
want to mask the entire upper nibble and treat the 
fire button separately. The following routine will in¬ 
vert the joystick data from port 0 and mask the 
unused bits as well as the fire bit. The result will 
be a four bit value that represents the joystick 
direction. 


When a contact on the joystick is pressed, its LDA JOY1 
corresponding bit in the joystick register is clear. NOT 
When two out of the lower four bits are clear, the 
joystick is on an angle. If you find it more conve- AND #$0F 


;READ THE JOYSTICK PORT 

COMPLEMENT THE 

ACCUMULATOR 

MASK THE UPPER BITS TO 0 
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Chapter 8 
Sound Effects 


One of the most advanced features of the Com¬ 
modore 64 is its ability to generate sounds. Built 
into the Commodore 64 is a highly advanced sound 
generator, the sound interface device or SID chip. 
This chip has the capability of generating three in¬ 
dependent tones over a range of more than six oc¬ 
taves. It has controls in each channel to control the 
attack, decay, and release times, and a sustain level 
for the volume of each channel. In fact, most of the 
features found in a musical synthesizer can be found 
in the SID chip. 

Figures 8-1, 8-2, 8-3, and 8-4 show some of the 
different waveforms that the SID chip can generate. 
Figure 8-1 shows a triangular waveform, which will 
produce the cleanest tone, as it is a fairly close ap¬ 
proximation of a pure sine wave. Figure 8-2 shows 
a sawtooth waveform. You will notice that it has 
sharper edges to it than the triangular waveform. 
Sharp edges on a waveform tend to generate various 
harmonics of the tone, so in general, the sharper the 
edges in a waveform, the more harmonics will be 
generated. The differences in the harmonic content 
can be heard as a difference in harshness of the tone. 


A triangular waveform will produce a very smooth, 
soft tone, while the square waveform, as shown in 
Fig. 8-3, produces a very sharp biting tone. When 
you select the square waveform in the SID chip, you 
have extra control over the tone of the sound. You 
can program in a pulsewidth for the wave, which 
varies the symmetry of the square wave. Depending 
on the settings that you use, the waveform will be 
more rectangular than square, as shown in Fig. 8-4. 

The SID chip can also generate a noise 
waveform. This is a random signal that changes at 
the oscillator frequency. Many games will use this 
waveform to generate explosions, wind storms, or 
any type of sound that is not a specific tone. In ad¬ 
dition, if channel 3 is set to generate noise, the 
amplitude of the waveform can be read by the 
microprocessor at any time. Because this is a con¬ 
stantly changing value, the number read will be a 
random number. 

FILTERING 

After you have created a sound, you can change 
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Fig. 8-2. Sawtooth waveform. 
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Fig. 8-4. Rectangular waveform. 
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it drastically by having the sound pass through one 
or more types of filters. An audio filter changes the 
sound by cutting down the volume of certain fre¬ 
quencies. Different types of filters will modify a 
sound in different ways. Each channel can be in¬ 
dividually selected as to whether or not it will be 
passed through the filter. 

The ability to route the audio outputs through 
one or more filters is a very powerful feature of the 
Commodore 64. Unlike most computers, which 
allow you to generate only simple tones, the filter¬ 
ing modes of the SID chip allow you to generate 
complex tones by modifying the harmonic content 
of the tones. The filters accomplish this task through 
a technique known as subtractive synthesis. By us¬ 
ing an input source that is high in harmonics, the 
filter can selectively eliminate specific frequencies. 
Depending on the filtering mode, the same initial 
tone can be used to create many different sounds. 
In addition to using the filtering modes in a static 
fashion (setting them and leaving them), you can 
control the filter settings in real time. By doing so, 
you will be able to create sounds such as wind 


storms and jet engines. These are sounds that can¬ 
not normally be generated well by a home computer. 

There are three types of filters in the SID chip, 
a low pass filter, a band pass filter, and a high pass 
filter. More than one type of filter can be selected 
at one time. When multiple filters are selected, the 
effects are additive. A notch filter can be created 
by selecting both the low pass and high pass filters. 
The filters will affect the sound in the following 
ways. 

Low pass filter. When the low pass filter is 
selected, all frequencies above the cutoff frequen¬ 
cy are attenuated at the rate of 12 dB/Octave. This 
filtering mode will generate a full sound. 

Band pass filter. The bandpass filter will at¬ 
tenuate all of the frequencies above and below the 
cutoff frequency at the rate of 6 dB/Octave. A band¬ 
pass filter produces thin sounds. 

High pass filter. All of the frequencies below 
the cutoff frequency will be attenuated at the rate 
of 12 dB/Octave when the highpass filter is selected. 
Tinny sounds can be generated when using this 
mode. Figures 8-5 through 8-7 show graphics fre- 
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quency amplitude as the cutoff frequency of the 
filters are changed. 

THE SOUND GENERATOR DEMO 

Included in Appendix C is a program that shows 
many of the abilities of the SID chip. Listing C-5 
is the source code; listing C-6 is the assembled code. 
This program loads three machine language files 
COMMON in Listing C-7, SNDDEF, in Listing C-8, 
and DATA in Listing C-9. By listening to this demo, 
you will begin to hear some of the possible sounds 
that can be created on the Commodore 64. As the 
demo is running, it will show you on the screen what 
effect it is currently demonstrating. Some of the 
longer attack and decay times will take a while to 
demonstrate, so please be patient. To run the demo, 
type in the following after checking to make sure 
the volume on your monitor is turned up: 

LOAD“SOUND DEMO”,8,1 

SYS 4096 

The sounds and effects in the program are by no 


means all of the sound effects that can be created 
by the SID chip. Depending on how sophisticated 
you care to become, you will be able to get many 
effects that are not directly obvious. For instance, 
if you write a program that changes the volume of 
one of the channels in real time, you will have full 
control over generating different types of tremelo 
effects. 

There are program segments in the demo that 
can be used directly or expanded to help generate 
almost any type of sound or tune. The routine that 
generates the short time that is played to show the 
effects of different waveforms simply reads a list of 
notes and note times. If the value of a note is $00, 
then the routine will quit. By changing the note 
values in the note table and the time values in the 
time table, this routine will play any type of tune. 

THE SOUND EDITOR 

In order to aid you in choosing values for the 
different registers, in the SID chip, a sound editing 
program has been included in Appendix C. Listing 
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Frequency 


C-10 is the source coed; Listing C-ll is the assem- Table 8-1. The Controls for the Sound Editor Program 


bled code. The Sound Editor shows all the SID 
chips’ registers on the Screen using the naming con¬ 
ventions discussed in Chapter 3. A cursor can be 
moved around the screen, allowing you to change 
the values that will be loaded into any of the SID 
registers. All of the numbers are typed onto the 
screen in hexadecimal notation, so the data that you 
create can be easily entered into your assembler. 
After all of the data fields that you care to change 
have been updated, you can instruct the Sound 
Editor to transfer the data to the SID chip. If you 
have enabled one of the channels, this should pro¬ 
duce a sound. Tb run the Sound Editor, type: 

LOAD“SOUND EDIT”, 8,1 

SYS 4096 

The controls for the Sound Editor are shown in 
Table 8-1. 


CURSOR DOWN 

Moves the cursor down one field 

CURSOR UP 

Moves the cursor up one field 

CURSOR RIGHT 

Moves the cursor one field to the 
right 

CURSOR LEFT 

Moves the cursor one field to the 
left 

0-9 

Allowable numbers for the data 
fields 

A-F 

Allowable letters for the data fields 

FI 

Transfers the data from the screen 
to the SID chip and the software 
timer. 


A brief description of the registers used by the 
Sound Editor follows. For a more detailed descrip¬ 
tion of each register, refer to the section on the SID 
chip. A listing of hexadecimal values for 6+ octaves 



worth of notes is provided in the COMMON file, tion, wherever all three voices have identical 

Listing C-7 in Appendix C. In the following descrip- registers, voice #1 is used as an example. 


V1ATDC 

V1SURL 

V1FRLO 

V1FRHI 

V1PWLO 

V1PWHI 

V1CORG 


The high nibble controls the attack time for this channel; the low nibble controls the 
decay time. 

The high nibble controls the sustain level for the channel; the low nibble controls the 
release time. 

This is the low order 8 bits of a 16 bit value that specifies a frequency for the channel. 
This is the high order 8 bits of a 16 bit value that specifies a frequency for the channel. 
This is the low order 8 bits of a 12 bit value that specifies the pulse width of the chan¬ 
nel when you are generating a square wave. 

The lower nibble of this register contains the high order 4 bits of a 12 bit value that 
specifies a pulse width of the channel when generating a square wave. 

This register is the control register for the sound channel. It controls the type of 
waveform as well as the synchronization mode. The enable bit for the channel is in 
this register. 


The following registers affect all three voice channels. 


FLCNLO 

FLCNHI 

MODVOL 

RESFLT 


The least significant 3 bits of this register are the low order 3 bits of an 11 bit value 
that controls the filter frequency. 

This register contains the high order 8 bits of an 11 bit value that determines the filter 
frequency. 

The filtering mode and the maximum volume for all three voice channels is controlled 
by this register. 

This register contains the resonance value and the filter enables for all three channels 


The last two registers used by the Sound Editor 
are not SID registers but RAM locations. These 
registers are treated as a 16 bit value that is used 
as a time counter. They are decremented every 1/60 


of a second. When the 16 bit value has been 
decremented to $0000, the release sequence is in¬ 
itiated for all three channels. 


SNDTM1 This is the low order 8 bits of a 16 bit value that determines the time in 1/60 

second intervals before the release sequence is initiated. 

SNDTM1+1 This is the high order 8 bits of a 16 bit value that determines the time in 1/60 
second intervals before the release sequence is initiated. 
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By experimenting with different values in the greatly speed up the time it takes to polish a game, 
registers, you will very quickly get a feel for what as the values for the sounds can be determined 
effect different values have on the sound. Being able separately from the main program, 
to specify the amount of time to play the sound can 
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Chapter 9 
Creating Graphics 


Up until now,this book has been primarily con¬ 
cerned with background information necessary for 
creating the program that will ultimately become 
a game. This is certainly an important part of learn¬ 
ing to program a game, but by no means all of it. 
Because a video game is an audio-visual experience, 
it will be necessary to create the graphics data that 
will be operated on by the program. 

There are a number of methods that can be 
used to create and enter graphics information into 
the computer. The method that you choose is pure¬ 
ly a matter of personal preference. This chapter will 
discuss a few of the options available to you when 
it is time to create graphics data. Also, instructions 
for using the graphics utility programs in Appen¬ 
dix C are given in this chapter. 

HAND CODING GRAPHICS 

At some point, you will probably be entering 
graphics data into your machine by hand. As this 
can be a very time consuming process, this section 
will show you some techniques that may make your 
job a little easier. 


Before you sit down to enter graphics data, you 
should have a good idea of what you want the final 
object to look like. You will need to know the 
graphics mode that you will be working in. Also, 
you must decide what colors you are going to use. 
For instance, if you are using multicolored sprites, 
each sprite can have one color of its own and can 
use 2 colors that are common to all the other sprites. 
To ensure that you will have the proper colors 
available to you, it would be wise to have decided 
how all of the characters should look before you 
start. 

Once you have chosen a graphics mode to work 
in, you will be able to start drawing your characters. 
In Figs. 9-1 through 9-7 you will find some sample 
graphics layout sheets. These sheets have a fine grid 
that is proportional to the dimensions of a pixel on 
the TV screen. The heavy grid is proportional to 
one character cell on the screen. There are 25 lines 
of 40 characters each on the Commodore 64. 

One thing that you should keep in mind when 
you are creating graphics for use on the Commodore 
64 is that it is often necessary to use more than one 
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^gBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBflBBBBBBBBBBBBBBBBBBBBBBBBBBBBflBBBBBBigi| 

|BHBBBIIIBBIBIIIBIIIIIBIBIIBIIIIIBIIIIBIBIIIBIIIIIIIIIIII|BBIIIIBBBII^| 
iBIIIIIIIBIBIBBIIBIIIIIIIBIBBIIIIBIIIIIBIBIIIIIIIIIIIIIIIBIBIlIBBgllBlEfl 
llBBIHBIBBIIBaaiBBIIBIBIIIIIIIIIlIBBIIBIBIIIIIIIIIIBIBBIBIBBIlilBIIBIIBll 
llBBBIBIIBaillBlIBBBIBIlIBBBBBBIIBIBBIIlIBBIIIIBIIlIBBBIIBIBBIIBlilBBIIBlI 
l■BBB■BBB■■■■■■■BB■■B■BBB■■BBBBflBBBBBBBBB■BB■■■flflflBBBBBflBBBBBBBBBiBBBBBBBl 
EbBBBBBI BBBBBBBIBBBBBBBBBBBBBBBBBBBBBBBIBBBBBBBIBBBBBBBIBBBBBBBBBBBBBBBlI 
VlBBBiaBIIBBBIBBIIIIIBIBIIIIIIIIIBIIBIIIIBIIBIIIIIIIIBIIIIBIIBBBIBIBBIMi| 
■BBIIBBIBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBIBBBBBBBB■■■■■BBBBBBBB^^I 
EbBBBBIIIBIBBBBIBIBBBBBIBIIIIBBIIBIIIIIIIIIIIIIIIIIIBIIIBIIIBIBIBBIII^E 
EbBBBBBBIBBIBBBIBBBBBBBBBBBIBIBIBBBBBBBBBBBBIBBIBBBBBBBBBIBBBIBIBBBBB^^I 
EBBBBBBIBBBIBBBIBBBBBBBIBBlIBBBIBBBBIBBIBBBBBBBIBBIBBBIIIIBlIBBIBBBBB^fl 
EbBBIBBIIIBBIIIIIBIIBIIIIIBBIIIIIIIIIIIIIIIIIIIIIBIIIIIIIIBBBIIIBIIBI^E 

[bIIBIBBIIIBBBIIIIBIBBIIIBIBIIIIIIIIIIIBIIIBIIIIIIIIIBIIIBIIIIIBIIIBIIBB|| 
IllIBaBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBI 

IlSSSSSSS ■■■■■■bb ■■■■■US■■■■SSSli 

|HBflBflBSBflBflBflBIBflflBHflBBSflflBflflBflBBfllBflBBBBflBflBIBBBflBflflBBBHBBBIBBflflBHn 
IbBBBBBBIBBBBBBBBBBBBBBBBBIBBIBIBBABBIBBIBBBBBBBBBBBBBBBBBBIBBBBIBBBBBBBB| 

|bibbbbbibbbbbbbibbbbibbiiibbbibibbibibbibbbbiibibbibbbiibbbbbbbibbbbbbbi| 

|ii|BBBBIBBBBBBBBBBBBBBBBBBBBBBBBBBBBIBBIBBBBBBBBBBBBBBBBBBBBBBBIBBBBIBBlI 
■■iBBBBIBBBBBBBBBBBBBBBBBIBBBIIIBIBBIBBBBBBBBBBBBBBBBBBBBBBBBIBIBIBBBBBB| 
^^■BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBiil 
^HbIIBIIBBIBBBIBBIBBIIIBBBIBBIIIBBIIIIIIBBBBIBI BBBBIBBI BBBBBBBIBBBBBHBB 

EHbiiiibibiiiiibiiibbibiiiiiiiiiiibiiibiibiiiibbiiiibibbbiiiibiiiibiHB 

IIIIBBBBBBBBBBBBBBBBBBBBB■BBBBBBBBBBBBBIIBBBBBBBBBBBBBBBIBBBBBBBBBBBBIBIBI 
IBBBBBBBBBBBBBBBBBBBBBBBBBIBBBBiBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBI 
IBBBBBBBBBBBBBBBBBBBBBBBB■■■■■■■!BIBBIBBIBBBBBBBBBBBBBBBIBBBBBBBBBBBBBBBII 
IBBBBBBBIBBBBBBBBBBBBBBBBBBBBBBBB■■■■■■■I■■■■■■■■BBIBBBBBBBBBBBBBBBBBBBSil 

IbbbbbbbibbbbbbbbbbbbbbbibbbbbbbibbbbbbbibbbbbbbibbbbbbbbbbbbbbbibbbbbbM 

IBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBIBBBBBBBIBBBBBBBBBBBBBBBBBBBBBBiil 
Ibbbbbbbi bbbbbbbibbbbbbbibbbbbbbibbbbbbbibbbbbbbibbbbbbbibbbbbbbibbbbbbM 


Fig. 9-1. A grid showing character spaces and individual pixels. 
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Fig. 9-2. A grid showing character spaces and double-wide dots for multicolor modes. 














Fig. 9-3. A grid showing character spaces. 
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pixel of a color on a line to guarantee that the pixel 
can be seen on the television. Television sets were 
not designed to be able to display drastic color 
changes on adjacent pixels. Depending on your color 
choices, a single pixel in an area of the screen may 
not be seen. This is due to the time that it takes 
the TV to turn on and off the appropriate electron 
guns that brighten a pixel. If the TV does not have 
enough time to adjust the guns, the pixel will have 
just started to light when the beams are changed 
for the next pixel. On the other hand, if you have 
2 or more adjacent pixels on a line of the same col¬ 
or, there will be enough time for the beams to be 
readjusted and the pixels displayed. 

The form in Fig. 9-1 is the form to use if you 
are going to be using the standard bitmapped 
graphics mode. "Vbu will notice that each pixel is rec¬ 
tangular in shape, rather then square as might have 
been expected. Thus, care must be taken when at¬ 
tempting to draw geometric patterns on the screen. 
Since the pixels are rectangular, the normal equa¬ 
tions for generating geometric shapes do not hold 
true. However, if you take into account the 4/3 
aspect ratio of the pixels, any shape can be drawn 
properly. 

The form in Fig. 9-2 is to be used if you are go¬ 
ing to be using one of the multicolor modes for your 
graphics. You will notice that each pixel on this form 
is twice as wide as the pixels on the form 9-1.This 
is because it takes two bits to represent the four col¬ 
ors available to each block in the multicolor mode, 
as opposed to the one bit that is needed to deter¬ 
mine whether the foreground or background color 
will be used in the standard color mode. Once again, 
the pixels are not square, and care must be taken 
when you are creating shapes. 

The form in Fig. 9-3 is generally used to repre¬ 
sent the screen in the character graphics mode. It 
also can be used as an overlay to represent one of 
the color memory areas in the bitmapped graphics 
mode. 

The forms in Fig. 9-4 through 9-7 can be used 
as design aids when you are creating sprites. There 
are four different sizes available. The different sizes 
correspond to the sprite X and Y multiplier options. 
If you decide to use one of the expanded sprites, 



Fig. 9-4. A grid for an unexpanded sprite. 

be sure to modify your program to change the 
SPRXSZ and SPRYSZ registers to the size option 
that you desire. The size of the grid on the sprite 
form is identical to the grid on the other graphics 
forms. This allows the sprites that you create to be 
placed on top of your background graphics forms 
to see how the entire screen will look. 

Once you have translated your drawing into a 
series of bytes, you have a couple of options as to 
what to do with the data. If you have a machine 
language monitor, you may choose to use the 
Memory Display option to display the range of 
memory where you would like your graphics data 
to go. At this point, your monitor should allow you 
to change the data on the screen. By using the data 
from your drawings to modify the data on the 
screen, you will create a section of memory that 
represents your graphics. After you have finished 
entering the data into the monitor, be sure to save 
the range of memory that you have just modified 
to the disk. The next step is to enter the address 
of your graphics into your program so that it can 
find the graphics later. 

Your other option is to enter the data into your 
assembler using the .BYTE directive. You can then 
assign names to all of the different areas of your 
graphics. The assembler can be directed to store the 
graphics data anywhere in memory. The main disad¬ 
vantage of entering the data into the assembler is 
that the data will be reassembled each time a 
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Fig. 9-5. A grid for a horizontally expanded sprite. 


change is made in your program. Depending on the 
amount of graphics data that you have, this can add 
substantially to the time that it will take to assem¬ 
ble the file. Another option would be to assemble 
the graphics data separately from the main pro¬ 
gram. If you do this, you must give the main pro¬ 
gram the addresses of where the graphics data will 
be located. In this case, the graphics data need be 
assembled only once. (Or, at least only as often as 
is needed to get the data correct.) 

USING A GRAPHICS TABLET 

A more popular way in which to enter graphics 
data into the Commodore 64 for use within the pro¬ 
gram is to use commercially available graphics 
packages to generate pictures. One of the most 
popular and useful of these is the Koala Pad. This 
package comes with a touch pad and software that 
allows you to easily generate background screens. 
Almost any type of graphics package will help speed 
up the process of generating graphics. 

A word of caution: before selecting a graphics 
package to aid with your drawings, it would be wise 
to be sure that it will fullfill your needs. There are 
two major pieces of information that you will need 
about the package: 

• What graphics mode does it use? 

• How can the picture be retrieved form the disk? 

Different types of games will benefit from the 


use of one graphics mode over another. If your ap¬ 
plication requires the use of a certain graphics mode, 
the graphics package that you choose must use the 



Fig. 9-6. A grid for a vertically expanded sprite. 
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Fig. 9-7. A grid for a sprite that has been expanded both horizontally and vertically. 

same mode. Otherwise, the data created will not be you can get no satisfactory information from the 
useful for your program. This sounds like good ad- manufacturer, or they claim that you have no right 
vice in theory; however, you will probably find that to know, you should not buy their software package, 
most of the available packages will use the When shopping for a graphics package, one 
multicolor bitmapped mode. On the other hand, especially useful feature is a zoom mode. Using a 

even if the program can not be used to generate zoom mode, you will normally be able to change in¬ 
data, it may be useful for testing color choices and dividual pixels on the screen with a minimum of ef- 

to see how things will look. fort. This will allow you, among other things, to 

It is quite possible that you will find a graphics clean up a drawing that was made free-hand or 

package that will seem to do everything that you create a shape pixel-by-pixel, which is too intricate 

would like it to, only to find later on that you can’t to create in any other way. 

get your picture back off the disk. It wouldn’t seem Be wary of a piece of software that will not 

to be very useful to create a picture if you can’t use allow you to use all 16 of the colors that the Com- 

it. Some graphics packages use what appear to be modore 64 can display or does not use the full 

protected file names to prevent you from retrieving resolution of the screen. After all, there is no reason 

your picture without using the software that created to sacrifice any of the abilities of your machine 

it. You should contact the manufacturer of the because of some other programmer’s shortcomings, 
graphics package if there is no documentation on In fact, most good graphics programs will give you 
how to load the picture without their software. If a pallette of more than 16 colors by giving you mix- 


53 



























tures of the different colors in different patterns. 
This can give you a choice of many colors and 
shades of colors that you may not have been aware 
were possible. 

Another feature that you will learn to appreciate 
greatly is an OOPS command. This usually allows 
you to erase the last changes that you have made 
to your drawing. This is a very useful function when 
you wish to experiment with color changes and 
other types of changes or additions that you might 
not be sure you like. If you don't like your change, 
you simply give the OOPS command and your draw¬ 
ing is returned to the state it was in before the 
change. 

The following section will give some informa¬ 
tion about the Koala Pad from Koala Technologies. 
Some of the information has come from the 
manufacturer and is not in the documentation that 
comes with the package. This is not by any means 
the only software package that will aid in game 
design; it is only being used as an example. A 
number of manufacturers have recently released 
light pens with graphics software, which may be 
useful. There are also digitizing tablets, joystick 
controlled graphics software, and keyboard con¬ 
trolled graphics software, which might be suitable. 
To attempt to evaluate all of the different packages 
is beyond the scope of this book. The preceding in¬ 
formation should aid in your evaluation of a product 
in the stores, and the following information on the 
Koala Pad should show you what type of informa¬ 
tion you will need to properly use the package of 
your choice. 


an inverted spade and is inaccessible from the 
keyboard. Koala uses this character as a flag to iden¬ 
tify files that it has saved on the disk. This character 
is followed by the character string PIC, which is 
followed by a picture letter and a space. 

A pair of utility programs that will convert file 
names to and from the Koala Pad format are in Ap¬ 
pendix C. These are: 

Listing C-12 KO-COM Changes the name from 
Koala format to 
Commodore format. 

Listing C-13 COM-KO Changes the name from 

Commodore format to 
Koala format. 


These are BASIC programs that will prompt 
you for the current filename and the name that you 
would like the file to be called. When using COM- 
KO, the program will insert the special character 
at the beginning of the name for you. 

After you have changed the name of the file in¬ 
to something that can be loaded, you will be able 
to use your machine language monitor to examine 
and reconfigure the data. The data is stored on disk 
in the following format: 


Koala Memory Map 

$6000 - $7F3F 
$7F40 - $8327 
$8328 - $870F 
$8710 


Graphics image 
Color memory image 
Color RAM image 
Background color 


Using a Koala Pad 

The Koala Pad is a touch sensitive tablet with 
an active area of 4" by 4" and a resolution of 256 
by 256 points. The pad plugs into one of the joystick 
ports on the Commodore 64 and is treated as a pair 
of game paddles by the software. 

File format. Before you try to use the data 
created on the Koala Pad, you will want to convert 
the name of the file to something more usable. 
When the software saves a screen to the disk, it 
precedes your file name with a single byte whose 
value is $81. This character prints on the screen as 


Note: If you are using a cartridge based machine 
language monitor, you may not be able to read the 
file as the cartridge replaces the RAM where the 
data will be loaded. 

After you have loaded the file, you can relocate 
the graphics data and the color data to anywhere 
that is convenient to your program. You should then 
save your newly created file back to the disk. You 
will probably want to move the data since the Koala 
software is more interested in reducing the size of 
the disk file than in placing the data in a useful loca¬ 
tion. It would be a good idea to move the color 
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memory areas to the beginning of a page boundary. 
This will make it easier and faster to manipulate 
the data later. The background color may be stored 
wherever is convenient. 

The data was created using the multicolored bit¬ 
mapped mode, so be sure to set the multicolor mode 
bit in the VIC chip before displaying the picture. 
Also, note that the border color is not stored in the 
file. You must set the border color to the appropriate 
value before displaying the picture. 

DISPLAY PIC, Listing C-14 in Appendix C, will 
display a Koala Pad picture on the screen. It will 
load the machine language routine MVTT in Listing 
C-15. This program follows the steps above to 
display the picture. It will also set the border color 
to black. It will display the picture until the shift 
key is pressed on the keyboard. This program will 
not display a picture if you change the location of 
the data in the file. To run this program enter: 

LOAD“DISPLAY PIC”,8<RETURN> 

RUN 

Enter the name of the picture to be displayed when 
prompted. The file name must have been previously 
changed using the KO-COM utility. A picture in the 
Koala Pad format is in Listing C-16 in Appendix C 
under the name PIC A CASTLE. This picture can 
be viewed using the DISPLAY PIC program. This 
drawing could make a nice background for a game, 
if you were so inclined. 

USING THE SPRITE MAKER 

Listing C-17 in Appendix C is a sprite making 
utility in BASIC. It loads two machine language 
routines, SLIB.0 in Listing C-18 and CLSP2 in 
Listing C-19. Using this program, you will be able 
to quickly create a sprite in either the one color or 
multicolor mode. You will be able to change any of 
the colors in the sprite or the background color. 
After you have finished designing a sprite, you will 
be able to save it to the disk for use in a program 
later. As you are drawing your sprite on the screen, 
you will be plotting squares on a 24 by 21 array of 
squares on the left side of the screen. In the upper 
right section of the screen, the sprite is shown in 


its true size and color, so you will be able to see ex¬ 
actly what the finished sprite will look like. In the 
upper left comer of the screen, there will be a white 
box if you are in the plot mode; otherwise you will 
be in the unplot mode and the comer will be blank. 

To run the Sprite Maker program, you must 
type the following: 

LOAD“SPRITE MAKER”,8 
RUN 


Enter the name to be used when saving or 
loading from disk. 

The SPRITE MAKER uses a combination of 
joystick and keyboard controls. All of the control 
options are shown below. 

JOYSTICK Moves the cursor around 
the zoomed sprite 

FIRE BUTTON Plots or unplots a point 


FI 

Toggles the plotting mode 

F3 

Enables the multicolor mode 

F4 

Disables the multicolor mode 

F5 

Changes the sprite color 

F6 

Changes the background color 

F7 

Changes the multicolor 1 


register 

F8 

Changes the multicolor 0 


register 

S 

Saves the sprite to the disk 

L 

Loads the sprite from the disk 


The joystick will move the cursor around the 
screen. When the fire button is pressed, a square 
will either be plotted or unplotted, depending on the 
plot mode at the time. Pressing the FI key toggles 
the plotting mode. The mode is set to OFF when 
the program is first run. The F3 key will enable the 
multicolor mode. Pressing the F4 key disables the 
multicolor mode. The multicolor mode is off when 
the program is first run. Pressing F5 will increment 
the sprite color register. The F6 key increments the 
background color. Pressing F7 will increment the 
sprite multicolor 1 register. This will only show an 
effect when the multicolor mode has been selected. 
Pressing F8 will increment the sprite multicolor 0 
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register. This will only show an effect when the 
multicolor mode has been selected. Pressing the S 
button will save the sprite to the disk using the name 
that you had entered earlier. Pressing the L button 
will load a sprite pattern from the disk with the 
name that you entered earlier. 

After you have finished editing a sprite, the 
sprite data will be at $4000. By using a machine 
language monitor, you will be able to save the binary 
sprite data from $4000 to $403F. If you will be us¬ 
ing multiple sprites, you may wish to move the data 
to a safe area in memory so that you can merge your 
new sprites with the old ones. 

USING THE SCREEN MAKER UTILITY 

If you are going to use a character graphics 
mode, you will need some way to specify the place¬ 
ment of the character graphics on the screen. The 
SCREEN MAKER Listing C-20 in Appendix C will 
aid you in defining a screen of graphics. This pro¬ 
gram will load three machine language routines, 
CLBACK1 in Listing C-21, CLSP1 in Listing C-22, 
and SLIB.0 in Listing C-18. This program will allow 
you to select any of the characters out of your 
character set, and place it in any position on the 
screen. This will allow you to see quickly how your 
screen will look. When you are finished, you will 
be able to save the screen to the disk. To run the 
program, type: 

LOAD“SCREEN-MAKE”,8 

RUN 

Enter the filename to be used when loading or sav¬ 
ing a file to the disk when prompted. The follow¬ 
ing controls are used in this program: 

JOYSTICK Moves the cursor around the 

screen 


FIRE BUTTON Plots the selected character 


FI 

on the screen 

Increments the current 

F3 

character number 

Decrements the current 

F5 

character number 

Increments the character color 

F7 

Increments the background color 

L 

Loads a file from the disk 

S 

Saves a file to the disk 


After you run the program, the screen will clear 
and the first character in the character set will be 
displayed in the upper left hand comer of the screen. 
The next character in the upper left hand comer 
of the screen shows the current character color. If 
this color is the same as the background color, the 
space will appear blank. 

Pressing the FI key will select the next 
character from the character set. You will see the 
character in the upper left comer of the screen. By 
repeatedly pressing the FI button, you can scan 
through your entire character set. Button F3 will 
select the previous character from the character set. 
By using these two buttons, you will be able to move 
forward or backward through the character set. 

The F5 key will increment the character color. 
This is the color that will be placed into the color 
RAM when the character number is placed in the 
screen RAM. Pressing the F7 key will increment 
the background color. This is useful when you wish 
to see what the screen would look like with different 
background colors. 

You may load a screen to be edited using the 
L command. When you are finished making 
changes, you should use the S command to save the 
screen back to the disk. When a screen is saved to 
the disk, the color information is saved to the disk 
along with the character placement information. 
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Chapter 10 
Some Arcade Games 


Before attempting to design your own video game, 
it would probably be helpful to understand how 
some other games are designed. In this chapter, you 
will be shown some of the ways in which some 
popular arcade video games could be programmed 
into the Commodore 64. In fact, the description of 
how to program these games may be quite accurate 
in terms of how the original was done. Bear in mind, 
however, that arcade machines tend to have some 
specialized hardware for graphics creation. 

PAC-MAN 

The most popular arcade game in recent times 
is PAC-MAN. This is a maze type game in which 
the player controls PAC-MAN in his journey around 
the maze while being chased by computer con¬ 
trolled ghosts. If PAC-MAN is hit by one of the 
ghosts, he loses a life. On the other hand, if PAC- 
MAN manages to eat one of the power pellets on 
the playfield, for a short amount of time the ghosts 
will turn blue. During this period of time, PAC- 
MAN may eat his enemies for a greater score. 


Difficulty levels are created by changing the 
speed of all of the characters and changing the 
amount of time that PAC-MAN has in which to eat 
the ghosts. PAC-MAN must eat all of the pellets on 
the playfield in order to advance to the next difficul¬ 
ty level. Twice during each level of play a bonus 
character appears on the screen for a short period 
of time. If PAC-MAN can eat the bonus character, 
he gets bonus points. The bonus character is worth 
more points on the higher levels. 

If you were to program PAC-MAN on the Com¬ 
modore 64, you would probably use the multicolor 
character graphics mode for the maze and the 
pellets. PAC-MAN and the four ghosts would be 
sprites. The bonus character could also be a sprite. 
At this point, you would have two sprites to spare 
because the Commodore 64 allows eight sprites, and 
only six have been allocated. These remaining two 
sprites could be used as the four power pallets by 
repositioning the sprites after the top 2 pellets have 
been displayed. This technique will be discussed in 
more detail in a later chapter. 
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Since the Commodore 64 maintains collision 
registers to determine collisions between sprites and 
between sprites and background, determining when 
PAC-MAN hits a ghost or power pellet should be 
no problem. The only part of the program that may 
be difficult is the part where it is determined which 
of the normal pellets PAC-MAN has eaten. For the 
most part, putting PAC-MAN on the Commodore 
64 would be a very direct translation. On the arcade 
game, the video monitor is rotated 90 degrees, 
which makes the maze taller than it is wide. This 
would be the only major discrepency between the 
arcade machine and a Commodore 64 translation. 

DONKEY-KONG 

In DONKEY-KONG, the player controls Mario, 
who is trying to rescue a girl from the clutches of 
DONKEY-KONG, a large ape. To do this, Mario 
must climb the various structures that DONKEY- 
KONG sits on. To make Mario’s life more difficult, 
DONKEY-KONG keeps throwing barrels and ham¬ 
mers down at Mario. On some screens, there are 
fireballs that he must dodge. As Mario climbs 
toward DONKEY-KONG, he can pick up articles of 
the girl’s clothing that she has dropped on her way 
up. Mario can also pick up a hammer and proceed 
to beat up the barrels and fireballs for a short 
amount of time. Mario can jump over the barrels 
and fireballs, for which he gains points. If Mario can 
get up to the level where DONKEY-KONG is stan¬ 
ding, he either rescues the girl, or depending on the 
level, DONKEY-KONG carries the girl higher up on 
the structure. Mario is then presented with the next 
level of play. The arcade version of the game has 
four different types of structures that must be 
climbed. 

Translating DONKEY-KONG to the Com¬ 
modore 64 is very similar to translating PAC-MAN. 
The background structures, DONKEY-KONG, and 
the girl can all be made up of character graphics. 
The articles of clothing that the girl has dropped 
can also be made up of character graphics. This 
leaves all of the sprites free for Mario, the barrels 
and the fireballs. 

If you watch an arcade version of DONKEY- 


KONG very carefully, you may see how its designers 
avoided the problem of needing a large number of 
sprites. When a barrel rolls past Mario and heads 
for the next lower level, it will normally roll off the 
edge of the screen rather than descending to the 
next level. Because the player’s eyes are normally 
focused on Mario and the portions of the screen 
above him, he will not normally notice the disap¬ 
pearing barrels. Because the machine does this, it 
never needs more than five sprites to display all of 
the barrels. This same technique will work for a 
translation of DONKEY-KONG for the Commodore 
64. If five sprites were reserved for fireballs and bar¬ 
rels and one for Mario, there would still be two left 
over for hammers. In fact, you would have even 
more flexibility in the use of sprites. For the most 
part there are only 3 or 4 sprites displayed on any 
given line. Using the technique of repositioning 
sprites, you could reposition the sprites on different 
lines. 

Like PAC-MAN, in the arcade, DONKEY- 
KONG’s screen is rotated 90 degrees from a nor¬ 
mal television. For this reason, any translation of 
DONKEY-KONG to the Commodore 64 will be 
wider and shorter than the original. 

CENTIPEDE 

In CENTIPEDE, a nasty centipede is running 
loose in a field of mushrooms. It starts at the top 
of the screen and winds its way down the screen 
until it gets to the bottom, where the player’s gun 
is. The players must shoot the centipede without 
getting hit by it. The centipede has 11 body 
segments. If the head is hit, the next body segment 
becomes the new head. If a body segment is hit, 
the centipede breaks into two parts, each of which 
has its own head. Whenever a segment of the cen¬ 
tipede hits a mushroom, it drops down to the next 
line and turns around. 

In addition to the centipede, the player must 
also avoid the spiders and fleas. Fleas add to the 
mushroom field, while spiders destroy mushrooms. 
Scorpions poison the mushrooms that they touch. 
A poisoned mushroom causes the centipede to de¬ 
scend straight down the screen. 
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This game could be a bit of a problem to 
translate because of the large number of moving ob¬ 
jects. The mushrooms can be made using multicolor 
programmable characters. Since the Commodore 64 
has only eight sprites to work with, there would ap¬ 
pear to be a shortage of sprites to use in the transla¬ 
tion. However, by using the technique of sprite 
multiplexing, you can trick the computer into work¬ 
ing as if it had 16 sprites. This technique is dis¬ 
cussed further in a later chapter; if used properly, 
it would allow the game to be translated for the 
Commodore 64. Eleven sprites are used for the cen¬ 
tipede’s segments, 1 sprite for the player, 1 sprite 
for the shot, 1 for the flea, 1 for the spider, and 1 
for the scorpion. This totals 16 sprites, or the 
number of sprites that multiplexing would provide. 

THE REVENGE OF THE PHOENIX 

To help illustrate how some of the different 
techniques describe in this book translate into a 
game, an arcade style game, Revenge of the 
Phoenix, has been included in Listing C-23 in Ap¬ 
pendix C. This game uses almost all of the techni¬ 
ques that have been covered earlier. It is included 
to help illustrate the capabilities of the Commodore 
64. To play the game, type the following: 

LOAD “PHOENIX VI.4N”, 8,1 

SYS 32768 

At this point, the program will go into its introduc¬ 
tion mode. If left alone, it will demonstrate how the 
game plays and eventually return to the introduc¬ 
tion. You may interrupt this process at any time by 
pressing one of the fire buttons. The game can be 
played by either one or two players. You can choose 
which mode you want to play by moving the arrow 
with the joystick on the title page. By pointing at 
the character that represents the mode that you 
would like to play and pressing the fire button, you 
will initiate game play in that mode. Since the two 
players (high wizard and low wizard) do not have 
exactly the same capabilities, you may choose which 
of the two players you would like to control. 

Game Play 

In Return of the Phoenix, you will be playing 


the character of a wizard protecting a castle from 
the magical phoenix. You are able to stun the 
phoenix with spells shot from your staff. The goal 
is to prevent the phoenix from building a bridge in 
the sky. They will try to get to the bottom of the 
screen, pick up an energy spell, and bring it to the 
top of the screen, where a section will be added to 
the bridge. Game play will continue until the three 
tier bridge is completed. At this point, both you and 
the phoenix will have a score. If your score is higher 
than theirs, you win. 

One of the wizards can fly around the screen 
and go virtually anywhere that a phoenix can. The 
other wizard must stay near the bottom of the 
screen. This gives each of the wizards unique play¬ 
ing characteristics. Which one that you care to play 
is very much a matter of personal preference. 

There are nine levels of difficulty in Return of 
the Phoenix. The skill level that you are currently 
playing is shown at the top of the screen in the 
center. As you are playing, the program constantly 
monitors your playing ability and modifies the skill 
level accordingly. If the program feels that you are 
playing very well, it will increase the level of dif¬ 
ficulty. On the other hand, if you are playing poor¬ 
ly, the skill level will be decreased. The skill level 
can only be decreased if you are above level 4. 
Starting at level 2, the phoenix will start dropping 
sleep spells on the wizards. If you are hit, you will 
be unable to move for about three seconds. At the 
higher levels, the phoenix will shoot more often and 
move faster and at some levels, the wizards will 
move faster also. 

Scoring 

In this game, you are competing against the 
phoenix for the high score. The phoenix are con¬ 
trolled by the computer, and they have a different 
method of scoring then do the wizards. The number 
of points that the phoenix gets depends on how long 
you can prevent them from getting energy bricks 
to the bridge. After every four seconds, the value 
of the bricks to the phoenix decreases. The bricks 
can be worth from 5 to 98 points depending on how 
long you can keep the phoenix from getting a brick 
to the bridge. All of the rest of the scoring is more 
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standard and shown in Table 10-1. 

When the two player mode is selected, both 
players are working for one score. The players’ score 
is in the upper left comer of the screen. Unlike most 
video games, in which the two players are com¬ 
peting, both players are working together for a com¬ 
mon goal. The phoenix score is in the upper right 


comer of the screen. This is just as valid a score 
as the players’ score, in that they are working toward 
their own objectives. If the wizards beat the phoenix 
score, the bridge will flash and fall down at the end 
of the game. Similarly, if the phoenix beat the 
wizards score, they will display their message at the 
end of the game. 


Table 10-1. The Scoring System for the Revenge of the Phoenix Game. 


Wizard shooting phoenix with energy brick.98 points 

Wizard shooting phoenix without brick.26 points 

Wizard shooting all 4 phoenix.1000 points 

Phoenix putting a wizard to sleep.325 points 
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Chapter 11 
Elements of Game Design 


Much of this book has been dedicated to the tech¬ 
niques of programming a video game on the Com¬ 
modore 64. In this chapter, some of the concepts 
that need to be used during the design of the game 
will be discussed. 


Be fun 

Have an interesting plot 
Be visually stimulating 
Have sound effects and music 
Have varying difficulty levels 
Keep score 


When you are designing a game, you are 
writing a program that is intended to be used for 
the amusement of others. Trying to make the game 
fun to play should be your primary consideration. 
There are some problems in trying to design an en¬ 
joyable game, however. For instance, when you 
come up with a game concept, you may think your 
game will be the best game ever written, only to 
find, after you have written the program, that it is 


boring. This can be caused by a number of factors. 
More often than not, the game idea was good, but 
the computer lacked the ability to display a game 
as complex as you wanted. 

One thing to beware of when designing a game, 
is the tendency to have the game play in exactly the 
same way each time it is played. If there are no ran¬ 
dom elements in the game, each move by the player 
will cause a specific move by the computer. This 
may be challenging at first, but will quickly become 
boring once it is mastered. The PAC-MAN arcade 
machine had this problem and it didn’t take long 
before patterns that showed how to beat the 
machine every time were published. All it takes is 
an occasional random move for the play to be 
unpredictable—which will add to the challenge of 
the game. 

After you have spent some time programming 
the Commodore 64, you will have a good idea of 
what it is capable of doing. If you take into account 
the capabilities of the computer during the design 
phase of your program, you will have a much easier 
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time writing the program. Many of the routines ex¬ 
plained in this book will enable you to write more 
complex games than you may have thought possi¬ 
ble. Techniques such as sprite multiplexing make 
it easy to display more sprites in the same area of 
the screen than is otherwise possible. This will give 
you more flexibility in the design of your game, 
which will make it more fun. 

Your game can usually be made more in¬ 
teresting if you discuss some of your ideas with 
others before you start programming. Because 
everybody sees things differently, you may be given 
some ideas that will greatly enhance the play of the 
game. Many of the large game corporations put a 
number of game designers in a room and have them 
toss ideas back and forth. A bull session such as this 
can be the fastest way to get creative input into the 
design of a video game. 

VISUAL IMPACT 

The visual impact of the game is the first thing 
anyone playing your game will notice. If the anima¬ 
tion is interesting, it will quickly attract attention. 
The proper use of color is important. When you are 
using a normal television as a monitor, certain col¬ 
ors interact with each other better than others. 
Black characters on a white background will give 
quite a bit of contrast. The characters will be very 
clear and sharp. On the other hand, red characters 
on a blue background will appear fuzzy and in¬ 
distinct. 

Varying the animation sequences that are used 
to make up a moving figure can add to the attrac¬ 
tion of the game, if they are changed at the ap¬ 
propriate time. A game in which a character 
explodes and fades out after it is shot will be a more 
interesting game than one in which the character 
simply disappears. Similarly, figures can be 
changed to indicate that something is being carried, 
or that the player is at a different level. At times, 
simply flashing the colors of a character will add 
to the visual effect of the game. 

SOUND EFFECTS 

Sound effects and music can add greatly to the 


appeal of a game. If nothing else, music played 
while the title page is displayed will hold a player’s 
attention as they are reading the credits, rules, or 
whatever else you may choose to put on a title page. 
In some cases, background music may be ap¬ 
propriate to a game. When this is done, it should 
be played at a relatively low volume with respect 
to the rest of the sound effects. Loud background 
music can be quite a distraction and a nuisance 
when it drowns out the sound effects. You may want 
to consider creating an option that will allow the 
game to be played without any background music. 

Many games provide a brief break as the player 
moves from one level of play to another. Quite often, 
during this pause, a short piece of animation is 
shown on the screen along with some music. If a 
game takes a long time to play, these breaks give 
the player a time to relax and catch his breath. 

DIFFICULTY LEVELS 

Virtually every game has different difficulty 
levels. The variations can range from simply in¬ 
creasing the speed of some of the characters at dif¬ 
ferent scores to starting a completely different 
portion of the game after a task is completed. For 
the most part, a game will be the same each time 
that it is played. Changing the level of difficulty 
based on the skill of the player will keep the player 
interested in playing the game even after he has 
mastered the beginning levels. Presenting him with 
a new challenge as a reward for gaining skill in the 
game will help to keep the player interested. You 
can make the game more fun to play by increasing 
the speed of the characters at higher levels and in¬ 
creasing the amount of shooting that the player is 
allowed to do. Some games will introduce a new 
character at each new difficulty level, so the player 
will keep playing in order to see all of the different 
characters. 

In the game Return of the Phoenix, Listing C-23 
in Appendix C, each new level of difficulty has a 
new speed for the characters and a different rate 
of fire. The level of difficulty is decided by the 
players’ skill. If he is playing well, the level of play 
will increase. When the player starts doing poorly, 
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the level of play will be reduced. This self adjusting 
difficulty (SAD) system keeps the game interesting 
by constantly adjusting the level of game play to the 
player. 

SCORING 

A player can tell how well he is doing by look¬ 
ing at the score. Almost all games should have a 
score of one sort or another. A player should be 
awarded points for actions that help him toward the 
goal of the game. The number of points awarded 
can vary greatly for different types of actions and 
can even be based on the current level of difficulty. 
In most cases, you will want to display the score con¬ 
stantly so that the player can tell how he is doing. 

Usually, when an action results in points being 
added to the score, some appropriate sound effect 
is generated. This sound serves to inform the player 
that he has done something good without forcing 
him to look at the score. Under some circumstances, 
a bonus should be awarded for completing a specific 
task. Bonuses are often used to tempt a player into 
a course of action, for some immediate points, which 
is not necessarily beneficial in the long run. 

Deciding on the number of points to award for 
the various actions is very subjective. You want a 
normal score to be high enough to make the player 
feel that he has accomplished something, but not 
so high as to be incomprehensible. You will probably 
not decide on your final scoring method on your first 
try, but will refine it during the testing process. 

Note: When you first decide on a scoring 
method, be sure to reserve enough bytes for the 
score to accommodate an extremely high scoring 


player. This will avoid the rollover when the score 
changes from all 9s to all Os. Never assume that just 
because you can’t get over a certain score that no 
one can. 

As an added feature, you may wish to include 
a feature that allows the highest scoring players to 
place their names on a scoreboard. Although not 
necessary, this feature can add to the competition 
between a number of players. 

The next chapter describes in detail the opera¬ 
tion of the BOGHOP game, which is in Appendix 
C. This game has been designed to demonstrate vir¬ 
tually all the programming techniques described in 
this book. 

If you have never programmed in assembly 
language, you may wish to try assembling the pro¬ 
gram as an exercise. Before doing so, you should 
make a copy of the source code disk and only work 
with the copy. The program has been structured in 
such a way that small changes can completely 
change game play. By reading the comments in the 
program listing, you will be able to see where you 
can make changes. This provides you with an easy 
way to start experimenting with an assembly 
language program. 

This Concludes the introduction to arcade game 
programming on the Commodore 64. Just as in any 
other field, the best way to learn is by doing. In this 
book, you have been given a strong foundation on 
which to build your program. By using the various 
definition files and libraries from Appendix C, you 
can spend more time writing your game program 
and less time coding the groundwork. I hope that 
you find a great deal of enjoyment in writing games 
and sharing them with others, as we have. 
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Chapter 12 

How BOGHOP Works 


This chapter describes the routines in the BOGHOP 
game in Appendix C. A number of the routines are 
general purpose in nature and you may find applica¬ 
tions for them in other programs. For each routine, 
the purpose of the routine will be listed; then a 
description of how the routine was implemented will 
be presented. Assembler directives will also be 
described where applicable. Before reading this sec¬ 
tion, you should play the game for a while. This will 
help you to visualize what the program is doing. 
BOGHOP in Listing C-24 is the source code for the 
main program. B0GH0P.0 in Listing C-25 is the 
assembled version. The other files used are de¬ 
scribed below. Tb run the game, type: 

LOAD“BOGHOP.O” , 8,1 

SYS5120 

The number of points that you get for shooting any 
given bad guy increases with each successive wave. 

The code for the game in Appendix C is spread 
over a number of files. In addition to BOGHOP, 
these files are: 


Listing C-l 
Listing C-2 
Listing C-26 
Listing C-27 
Listing C-7 
Listing C-28 
Listing C-29 
Listing C-30 


MACLIB 

SYSDEF 

BOGDEF 

BOGDAT 

COMMON 

XXPLOT 

LOOKUP 

BOGSPR 


MACLIB is the macro library. The source code 
for all of the macros described in this book can be 
found in this file. Detailed descriptions of the macros 
can be found in Appendix B. All of the assembly 
language programs in Appendix C use this file. 

SYSDEF contains the system definitions. 
Names are assigned to all the hardware registers 
that will be used throughout the program. This file 
is also used by the other programs in the book. 

BOGDEF has all of the RAM definitions (the 
variables and buffer areas) that are used in the 
BOGHOP program. The definitions in this file are 
specific to the BOGHOP program and will not be 
used by any other program. 
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BOGDAT is a date definition file. Lookup charts 
and other data to be used by the BOGHOP program 
are defined in this file. Like BOGDEF, this file is 
used exclusively by the BOGHOP program. 

As its name implies, COMMON is a file that 
is used by virtually all of the assembly language pro¬ 
grams in this book. In this file, names are assigned 
to notes over an eight octave range. This is a useful 
file for any program that uses the SID chip. 

XXPLOT contains a subroutine named XPLOT, 
which is used to exclusive OR a point to the screen. 
It uses data from the LOOKUP file, which must be 
loaded into memory before using XPLOT. The ad¬ 
vantage of exclusive ORing a point to the screen is 
that if the same point is plotted twice, the screen 
will be returned to the same condition as before the 
first point was plotted. Note that OOPLOT, Listing 
C-31, allows points to be ORed rather than exclusive 
ORed to the screen. BOGSPR contains the data 
that defines the shapes of the sprites that will be 
used in the BOGHOP program. 

The code portion of the program is in the 
BOGHOP file (Listing C-24). This file loads the 
other routines during assembly. The following 
description tells how the BOGHOP file loads the 
other files and how they relate to the BOGHOP pro¬ 
gram, and how the BOGHOP program runs. 

THE START OF THE PROGRAM 

The first line of the program is a PUT state¬ 
ment with the name of the program. After you have 
finished editing the program, you can delete the line 
number and semicolon, (which turns the line into 
a comment) and press the RETURN key to save the 
program to disk. By saving the program in this way, 
you will always save the program to the disk with 
the same name. Because it is common to use similar 
names for different sections of a long program, the 
possibility of saving the program under an already 
used filename and thereby destroying the other file 
is eliminated. 

Following the put statement are a number of 
other comment lines used to document the program. 
It is a good idea to put the date of the last update 
to the program in the program itself, so you will be 


able to distinguish one printout from another. If you 
are making a number of different changes to the 
program in the same day, you should also put the 
time of the last update in the program. The name 
of the program module should be in the first few 
lines of the program so that you can quickly tell 
what program you are working on. 

The Macro Library 

The .LIB directive is used to load in libraries 
of code, data, and definitions. In this program, a 
library of macro definitions, a library of system 
definitions, and a program segment of RAM defini¬ 
tions specific to this game are loaded in. A library 
of note definitions and note time values as well as 
data specific to the program are also loaded. 

When a .LIB directive is used, the assembler 
will treat the code to be inserted as if it were typed 
into the program at that point. By inserting other 
program segments into your program in this way, 
you will not have to make any changes to your 
libraries to use them in other programs. You also 
gain an advantage in the speed of editing. Had you 
entered all of the different sections as one large pro¬ 
gram, every time that you tried to edit the program, 
you would have to wait for the entire thing to be 
loaded into memory. In the Commodore 64, this 
could take quite a while. Also, it is easier to print 
listings of only the portion of the program that you 
are currently working on, if the program is broken 
into smaller segments. 

The macros in the macro library and the system 
definitions have been described in detail elsewhere, 
so they will not be described here. The BOGDEF 
file contains the zero page RAM allocations that will 
be used for the game. Whenever possible, the zero 
page of RAM should be used for all variables. Do¬ 
ing so will cause the code generated by the 
assembler to be 2/3 as large and execute significant¬ 
ly faster than if the variables are elsewhere in 
memory. 

In this program, variables are allocated using 
the DS macro rather than using equates. The DS 
macro reserves the number of bytes following the 
macro call for the label preceding the macro call. 
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This frees you from having to keep track of where 
each variable is going to be placed in memory. More 
importantly, if you find at a later time that you need 
to insert a variable between two existing variables, 
you will not need to redo all of the equates follow¬ 
ing the new variable. You would need to redo all the 
equates if you were using indexed addressing and 
a new variable had to be in a specific place. When 
you are using equates, it is easy to make a mistake 
and define two or more variables with the same 
memory location. A mistake of this type can be very 
difficult to debug. When using the DS macro, the 
assembler will keep track of the addresses of the 
variables and generate them each time the program 
is assembled. 

RAM Definitions 

In the beginning of the RAM definition section 
of the program (the BOGDEF section) program, all 
of the shadow registers for the SID chip are de¬ 
fined. As mentioned earlier, you will usually change 
a value of one of the shadow registers for the SID 
chip rather then changing the SID chip directly. 
Most of the registers in the SID chip are write only 
registers. For this reason, you will not be able to 
find out what the current value is in one of the 
registers. In this program, the value in the shadow 
registers will be transferred to the appropriate 
register in the SID chip during one of the interrupt 
routines. The technique of shadowing registers will 
always leave the current value of a hardware register 
in a variable location, so that the software will 
always have access to the value. 

Also defined in the RAM definition section of 
the program are a number of general purpose 
registers. These locations can be defined in the 
same way for virtually every program you write. You 
may not use all of them every time, but they pro¬ 
vide a good starting place. 

All of the two byte definitions will be used as 
pointers for indirect addresses. SRC and DST are 
used as source and destination pointers for data 
transfers. The NOTPT and NOTTM registers are 
used to hold the address of a sequence of notes and 
their respective durations for generating music. 


The SNDTM registers are used as software 
timers to control the voice channels. Whenever a 
value is placed in one of the SNDTM registers, it 
is decremented until it reaches 0. Once the value 
reaches 0, the appropriate voice channel will be 
disabled, causing the release sequence to be in¬ 
itiated. 

The OPTION register can be used to hold the 
number of whatever option is being used during the 
game. Options can be things such as one or two 
players and easy or hard play. 

The RAND registers contain random numbers. 
During one of the interrupts, a new value is placed 
into one of the four RAND registers. Every four 
screens, there will be new values in each of the 
RAND registers. The value placed in the RAND 
registers is derived from the RANDOM registers, 
the SCREEN, timer, and the other RAND registers. 
This helps ensure that there will be a fresh value 
in the RAND registers whenever you need a ran¬ 
dom number. The RANDOM register, which is part 
of the SID chip, changes at a rate proportional to 
the frequency of voice 3. If this register were to be 
used directly to get a random number, there is a 
good chance that your program would be so fast that 
the value could not change since the last time it was 
read. 

In the LEVEL register, you will usually find the 
current difficulty of play. The next four registers are 
used as system timing registers. SCREEN is in¬ 
cremented once every 1/60 of a second. RANSEC 
is incremented every 1/60 of a second, but counts 
from 0 to 59. SECOND is incremented once per sec¬ 
ond when RANSEC goes from 59 to 0. ENABLE 
is set to a 1 at the end of the INTO interrupt routine. 
This register is used to synchronize the main pro¬ 
gram with the interrupt routines, thereby keeping 
the timing of the system absolute. At the end of the 
main program loop, ENABLE will be set to 0. The 
program will then enter a short loop until ENABLE 
goes to 1. This will ensure that the main program 
loop is executed only once per screen (1/60 second). 

There are four buffer areas defined in RAM. 
BUF and BUF1 are to be used as temporary storage 
and work areas for any of the routines in the main 
program loop. Each buffer area is defined to be eight 
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bytes long. MBUF is a buffer area that is to be 
used only during macro calls. Similarly, IBUF is to 
be used only during interrupt routines. 

Some restrictions must be observed for the 
proper use of the buffer areas. These buffer areas 
are for the internal use of routines only! They should 
not be used to pass data from one routine to another. 
If data needs to be passed, a variable should be 
defined in which to pass the data. The proper buf¬ 
fer area must be used for each routine. Allowing an 
interrupt routine to use BUF or BUF1 can result 
in unpredictable operation of your program. If an 
interrupt is received while a routine that uses BUF 
or BUF1 is in process, the interrupt can destroy the 
data if the interrupt routine also uses these buffer 
areas. If you find that you need a larger buffer area, 
you should probably define a special area for the 
routine that needs it. 

The LPCNT registers are for use as loop 
counters. Under normal circumstances, you will be 
using the X or Y registers as loop counters. In some 
cases, you will be changing the X and Y registers 
during a loop, making them useless as loop counters. 
As with the buffer areas, do not use the LPCNT 
registers in both the main program loop and in an 
interrupt routine. 

The next series of variables are used to specify 
a point to the point plotting routine. COLOR re¬ 
quires a number from 0 to 3 to determine the bit 
pair to be plotted on the screen. POINT and 
CTEMP are internal registers to the point plotting 
routine. GBASE is a two byte address that specifies 
the base address of the high resolution screen to be 
used by the point plotting routine. If you are using 
a general purpose plotting routine, XOR can be 
used to specify whether the point should be OR’d 
or EXCLUSIVE OR’d onto the screen. XPNT has 
the horizontal position of the point and YPNT has 
the vertical position of the point. In this game, the 
point plotting routine is written to subtract the off¬ 
set of a sprite position, so that the coordinates of 
the point can be transferred directly from the sprite 
position to the point position. 

HMSB is a register that holds the ninth bit of 
a nine bit horizontal sprite position. This is used as 
a temporary register for calculating the ninth bit. 


The result is usually transferred into another 
register. Most of the sprite horizontal positions are 
stored after being divided in half. This allows the 
horizontal positions to be stored in 8 bits. Before be¬ 
ing stored in the VIC chip, the data must be expand¬ 
ed back into a nine bit format. One of the main 
advantages of storing the data in an 8 bit format is 
that a horizontal position can be checked using a 
single byte comparison; the position does not have 
to be expanded into two bytes before a comparison. 
There are macros that unpack a nine bit value into 
either a two byte value or a one byte value after 
dividing the 9 bit value by 2, but they are less effi¬ 
cient then storing the divided value initially. 

HORNC and VERNC hold the increment to be 
used when changing the position of one of the com¬ 
puter controlled characters. By changing these 
values by varying amounts depending on the level 
of play, the characters are given different speeds in 
the horizontal and vertical directions. 

The following definitions are more specifically 
related to this game, although many of them will 
be useful in other types of games. 

The number of lives that the player has left can 
be found in LIVES. When LIVES=0, the games is 
over. 

Four bytes are reserved to hold the SCORE. 
Since the data stored in SCORE is stored in a BCD 
format, the score can have up to eight digits. Many 
games preset the least significant digit to 0, which 
would give nine digits. In this game, the score is run 
through a leading zero suppression routine that 
prevents insignificant zeros from preceding the 
score. 

MOUNTV has the vertical position of the 
mountains, while MOUNTH has the horizontal 
positions. MOUNTP contains the sprite pointers for 
the mountains. Colors for the mountains are held 
in MOUNTC. Each of these registers are defined 
to be eight bytes long, one byte for each of the moun¬ 
tain sprites. Since the horizontal positions of the 
mountain sprites are stored in a nine bit format, the 
MNTMSB holds the ninth bit for the horizontal 
position. 

WHOLIV is a byte that has the status of each 
character on the screen. If a character is still alive, 
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its corresponding bit will be set in WHOLIV. The 
player’s characters is in bit 0,the computer con¬ 
trolled characters (BAD GUYS or MEANIES) are 
represented by bits 1-7. This scheme of using one 
bit per character is also used by SHOTS to tell which 
shot is in flight. 

TMSCOL is a temporary register used to hold 
the last valid sprite to sprite collision data as read 
from SSCOL. Since the data in SSCOL is cleared 
by reading it, it is necessary to put the data in a safe 
place until it can be used. This is even more critical 
when using the sprite multiplexing and reposition¬ 
ing techniques, as the data in SSCOL may not be 
relevent to your program if you wait until you are 
ready to use the data before reading it. Similarly, 
TMBCOL is used to store the data read from 
SBCOL for sprite to background collisions. SSCOL 
and SBCOL are transferred to TMSCOL and 
TMBCOL during INTO. 

There are eight bytes reserved for each of the 
following player and bad guy parameters: horizon¬ 
tal positions, vertical positions, colors, directions, 
and explosion status. 

Sixteen bytes are reserved for use as pointers 
to the movement charts used by the bad guys to 
determine their movements. 

SHOTSH holds the horizontal position of the 
shots, stored in an eight bit format. SHOTSV holds 
the vertical position of the sprites. SHOTSD con¬ 
tains the direction that each shot is to go. Eight bits 
have been allocated for each of the last three 
parameters. 

This concludes the RAM definitions for all of 
the variables used by the program. Usually, it is a 
good idea to try defining all of the variables before 
you begin to write any code. By doing so, you will 
force yourself to decide on an approach to take in 
programming your game before you start coding it. 
You will find that programming will go faster once 
you have defined your variables. Of course, if you 
miss a few, you can add them later. 

Musical Definitions 

The COMMON file is loaded in next. This file 
contains frequency definitions for the SID chip. 
These definitions cover an eight octave range. The 


format is as follows: 

1. The first letter is the name of the note. 

2. The second letter is either N for NATURAL 
or S for SHARP. 

3. The third position is for a number between 0 
and 7 which specifies the octave number. 

COMMON also contains definitions of note 
times. These times are based around a timer of 1/60 
of a second. That is, if you decrement these values 
once every 1/60 of a second, you will get the 
proper duration of a note. If you are going to be 
creating complex musical rhythms, you should 
verify that the times used for notes in all channels 
is such that the beat is kept constant. You may have 
to adjust the times to match your application. 

The Data Section 

BOGDAT, the next file loaded into the program, 
is a data section. In it are all of the data and lookup 
charts that will be used throughout the program. 

BITPOS is a lookup table that can be used to 
set a bit. BITAND is a lookup table that can be 
used to clear a bit. 

Following these lines are a number of lookup 
charts that are used to determine that bad guys’ mo¬ 
tion. Each chart ends with a 0 so that the routine 
that uses these charts can find the end. 

The next charts are used to determine which 
movement charts are to be associated with which 
type of bad guy. 

BASLK is a chart that contains the base ad¬ 
dresses of the lookup charts that contain the base 
addresses of the movement charts. 

BADSEQ is a chart that is used to determine 
which type of bad guy will appear at each level. By 
extending this chart and the next three charts that 
will be described, the game can be made to have 
any number of levels (up to 255). 

SPEEDH is a lookup chart that is used to deter¬ 
mine the horizontal speed of the bad guys de¬ 
pending on the level. Similarly, SPEEDV is used to 
choose a vertical speed for the bad guys. 

FIRPOW is used to determine how often the 
bad guys should shoot. A random number is chosen, 
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and if the number is less than the value in FIRPOW, 
the bad guy can shoot. 

NUMBER is a lookup chart that indicates 
where the image of the various numbers can be 
found in memory. NUL is all zeros, for use by the 
leading zero suppression routine. 

TYPELK is a chart of sprite pointers that point 
to the first sprite in an animation sequence for the 
bad guys. 

SHTDR is a table used to choose a direction 
for a bad guys 1 shot. 

COLK and POR are used by the point plotting 
routine. 

The Point Plotting Routine 

XXPLOT is the next file to be loaded into the 
program. It contains only one routine, the point plot¬ 
ting routine XPLOT. XPLOT refers to lookup tables 
that can be found in the LOOKUP file. The lookup 
tables contain data that serves to map the screen 
into normal cartesian coordinates. By storing the 
horizontal coordinate the XPNT and the vertical in 
YPNT, the proper point on the screen can be found. 
The base address of the screen must be stored in 
GBASE. Since the routine is written to make use 
of a multicolor bit-mapped screen, valid horizontal 
values will normally be within the range 0-$A0. 
XPLOT has been rewritten to subtract the offset 
associated with sprite positions before processing 
the point. 

At the beginning of the routine, the sprite ad¬ 
justment is made, and the resulting point is 
checked to see if it is in a range to be plotted on 
the screen. If the point can not be plotted on the 
visible screen, the routine will end with an RTS in¬ 
struction. The vertical position of the point is 
transferred to the X register. The horizontal posi¬ 
tion is divided by four and transferred to the Y 
register. The X register is then used as an index into 
VLKUPL, which has the lower eight bits of the base 
addresses of each scan line. This byte is added to 
the low byte of GBASE, which contains the base ad¬ 
dress of the screen. The result is stored in POINT. 
This sequence is repeated for the high byte of the 
scan line base address, which is in VLKUPH. The 
result of the addition of a byte from VLKUPH and 


GBASE+1 is stored in POINT+1. The value in the 

Y register is used as an index into a table of horizon¬ 
tal offsets of the byte on the screen. As with the 
vertical lookups, the appropriate offsets are added 
into the address in POINT. An indirect address that 
points to the byte that contains the point to be plot¬ 
ted in now in POINT The horizontal position in 
XPNT is loaded into the accumulator and AND’d 
with a $03. The result is then transferred into the 
X register for use as an index into a table that will 
specify the bits to change. 

In preparation for loading a byte indirectly, the 

Y register is cleared to 0. An indirect load is then 
performed using the value in POINT, the loaded 
value being stored in CTEMP for use later. The Y 
register is then loaded with the value in COLOR. 
Next, a byte that contains a bit pattern correspon¬ 
ding to the color in COLOR is loaded, using Y as 
an index. This byte is AND’d with a mask from a 
lookup table of mask values, which is chosen using 
the X register as an index. The result will be a byte 
that has only those bits that correspond to the posi¬ 
tion and color of the point to be plotted set. This 
byte is exclusive OR’d with the byte previously 
stored into CTEMP. The Y register is once again 
cleared to 0 in preparation for an indirect address¬ 
ing instruction. Using a store indirect instruction, 
the new byte, with the bits changed corresponding 
to the plotted point, is stored back into screen 
memory using the address in POINT. The last in¬ 
struction in this subroutine is a return from 
subroutine instruction. The routine will destroy the 
original contents of the A, X, and Y registers. 

The Equates Statements 

The main lookup tables that were used by the 
point plotting routine have been assembled 
separately from the program. In order to make use 
of this data, the data file must be loaded into 
memory before the program is run. In order for the 
assembler to make use of data (or code) that is to 
be assembled at a different time, any names refer¬ 
ring to code in the other file must be defined. The 
LOOKUP file includes the lookup tables described 
earlier, as well as a number set that can be used in 
scores. The addresses of where the data can be 



found in memory have been defined with equate 
statements in the main program. 

Defining the System 

The next section of the main program code sets 
the parameters for the system. The Commodore 
64’s operating system is disabled, the keyboard is 
disabled, and the joysticks are configured as input 
devices. The border and background colors are set 
to black. 

Bank 1 of RAM is selected as the graphics page. 
The base address of the high resolution bit map is 
set to an offset of $2000 in this bank of RAM, giv¬ 
ing it an absolute address of $6000. This address 
is then stored in GBASE for use in the point plot¬ 
ting routine. The base address of the text page is 
set to an offset of $1C00, giving it an absolute ad¬ 
dress of $5C00. The screen mode is set to bit map¬ 
ped graphics and the multicolor mode is selected. 
Color RAM is cleared to white, text RAM is cleared 
to $56 (green and purple), and the graphics page 
is cleared to $00. 

Initializing RAM 

Before the main program can be executed, all 
of the RAM variables must be set to their initial 
values. For example, the variable LIVES contains 
a number that represents how many player 
characters the player will start with Sound 
generators are enabled, the scores are cleared to 0, 
and starting positions are defined. Before starting 
the main loop, the collision registers are cleared, 
RASTER interrupts are enabled from the VIC chip 
on scan line $FB, and the interrupt disable bit is 
cleared. 

THE MAIN PROGRAM LOOP 

START marks the beginning of the main pro¬ 
gram loop. The first thing that needs to be done is 
to determine whether or not the game is still in play. 
This is done by ORing the LIVES register with all 
of the explosion registers. If the result is 0, the game 
is over. In this case, a jump to STWID, which is past 
the majority of the code, will be executed. The on¬ 
ly other portion of the main program that will be 
executed is a check to see if the game should reset. 


Scores 

Since the screen has been set to be in a high 
resolution, multicolor bit map mode, the scores will 
have to be drawn from an appropriate character 
generator. The program will use a set of numbers 
that have been defined in the LOOKUP file. These 
characters will be drawn on the screen in the color 
as specified in the color RAM. Each number is com¬ 
prised of 16 bytes. 

The score routine is run only once every 16 
screens. The timing is accomplished by loading 
SCREEN, ANDing it with $0F, and comparing the 
result to $0F. If the comparison is equal, the routine 
is executed. Otherwise, a jump is taken to NOSCR1, 
bypassing the routine. All of the timing elements 
in the program use this method to determine when 
to run a routine. 

This routine prepares all four bytes of the score 
to be displayed. Each byte of SCORE contains two 
digits of the score. Each nibble of SCORE will be 
separated and stored in BUF through BUF+7. The 
high nibble will be shifted into the low nibble us¬ 
ing the NIBLR macro. For the digits that are in the 
low nibble, the upper nibble will be masked to 0 us¬ 
ing the AND #$0F instruction. 

Once all of the digits have been place in BUF, 
the score will be run through a leading zero sup¬ 
pression routine. Although this is not essential for 
the proper operation of the game, it tends to make 
the game look more professional. A score without 
leading zeroes is also easier for the player to read. 
Leading zero suppression is accomplished by check¬ 
ing the most significant digit of the score first. If 
the byte is a 0, the byte is replaced with a $0A. 
When the score is displayed, a $0A will be displayed 
as a blank. This sequence will be repeated for the 
most significant 7 digits. If a digit other than a 0 
is encountered, the program will branch to NZSUP, 
ending the suppression routine. This will prevent 
significant zeroes from being suppressed. 

At this point, the score is ready to be displayed. 
To prepare for the display loop, the X register is 
cleared to 0, and the base address of the video 
screen ($6000) is stored in BUF1+2. 

In the beginning of the loop, the most signifi¬ 
cant digit of the score is loaded into the accumulator 
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and shifted left by one bit. The byte is then transfer¬ 
red into the Y register, where it will be used as an 
index into a table of addresses that correspond to 
the numbers in the character table. The byte had 
to be shifted left because it was to be used as an 
index to a table of two-byte addresses, as opposed 
to a table of single-byte data. The address of the 
digit is stored in BUF1, and the Y register is cleared 
to 0 to prepare for the inner loop. 

In the inner loop of the score routine, a byte is 
loaded indirectly from the address in BUF1 and 
stored indirectly at the address in BUF1+2. The 
Y register is then incremented and checked for $10. 
If Y is not yet $10, the routine loops to MKSCR2 
and moves the next byte of the digit to the screen. 
When the digit is finished, a two byte increment of 
$10 is performed on BUF1+2. This increment 
changes the indirect address to point at the next 
character position on the screen. The X register is 
then incremented and compared to 8. If the X 
register is not yet 8, the routine loops to MKSCR1, 
which will move the next digit to the screen. When 
the X register reaches 8, the routine ends with all 
8 digits displayed on the screen. 

Moving the Bad Guys 

This is the routine that moves the bad guys. At 
the top of the loop, WHOLIV is checked to see if 
the bad guy is still alive. The explosion register is 
then checked for 0 to verify that the bad buy is not 
in the explosion process. If the bad guy is alive, a 
byte is loaded using an address found in the ap¬ 
propriate MEANMV register. This byte is treated 
as a direction byte. If it is not $00, a branch is taken 
to the movement portion of the routine. The byte 
is stored in BUF1 for use later. The direction 
register is checked, and if the direction is 1, the 
direction bytes is inverted. The speed of movement 
is determined by using LEVEL as an index into 
SPEEDH and SPEEDY. These values are placed in¬ 
to the horizontal and vertical increment registers, 
HORNC and VERNC, which are used by the move¬ 
ment subroutines. Starting from the least signifi¬ 
cant bit, the lower four bits of the direction byte 
represent up, down, left, and right. The direction 
byte is rotated right, and if the carry bit is set as 


a result, the proper movement subroutine is called. 

After checking all four bits of the direction 
register, the MEANMV register pair is incremented 
to point at the next instruction byte. The loop 
counters and index registers are then incremented, 
and the program branches back to the top of the 
loop. This sequence is repeated until all of the live 
bad guys have been moved. 

Had the direction byte contained a $00, it would 
indicate the end of the movement table. In this case, 
a new movement table would be selected. The type 
of bad guy is determined by using LEVEL as an 
index into BADSEQ, which is a table of bad guy 
types. The type byte is then shifted left in prepara¬ 
tion of use as an index into a base address table of 
movement patterns. This sequence allows specific 
types of movement to be used with specific types 
of bad guys. The routine then loads a random 
number that will determine which of the four possi¬ 
ble movement patterns will be selected for the bad 
guy. The new address, which points to the move¬ 
ment pattern, is loaded and stored in the appropriate 
MEANMV register pair. The direction byte is then 
loaded and control is passed to the movement por¬ 
tion of the routine. 

Incrementing the Level of Play 

In order to advance to the next level of play, all 
of the bad guys have to be killed. WHOLIV con¬ 
tains the current status of the bad guys. Each of the 
first 7 bits of WHOLIV corresponds to one of the 
bad guys. When all of the bits are 0, all of the bad 
guys are dead. This is checked by loading WHOLIV 
into the accumulator, ANDing it with #$7F, and 
checking it for 0. If it isn’t 0, the routine jumps to 
LEVDN, bypassing this routine. 

When the level of play needs to be incremented, 
new vertical positions, as well as new horizontal 
positions, are chosen for all of the bad guys. The 
directions are cleared, and new sprite pointers are 
chosen. WHOLIV is reset to $FF. LEVEL is then 
incremented and checked for $12, which is the 
highest level defined. If you wish to define more 
levels of play, this number needs to be increased. 
If the level exceeds $12, LEVEL is decremented to 
$12. 
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Seeing If the Bad Guy is Hit 

The purpose of this routine is to determine 
whether or not the player’s shot was hit by one of 
the bad guys, and if it was, to determine which bad 
guy hit the shot. The hardware collision registers 
can be used to determine whether or not a collision 
took place, but they cannot necessarily be used to 
determine which characters were hit. If two or more 
sprites collided, and the shot hit a sprite, you can 
not differentiate between the various collisions. 
Because the player and his shot are displayed on 
alternate screens, the collision status is only valid 
on even screens, and the routine will be bypassed 
on odd screens. If it is determined that a collision 
took place, collision checking will be done through 
the software. Software collision checking could be 
used instead of hardware collision checking, and in 
many cases is preferable, but a combination of the 
two will run faster. In the next section you will see 
a situation in which the hardware can be used ex¬ 
clusively for collision checking. 

The temporary sprite collision register 
TMSCOL is loaded and checked for a collision in 
sprite 0. Sprite 0 is the player’s shot. If it wasn’t hit, 
there is no need to check any further, so a branch 
will be taken to BCOLND, passing over the routine. 

Had the sprite been hit, WHOLIV would have 
been shifted left one bit to align its bits with the 
bits in TMSCOL. These two bytes are ANDed 
together and ANDed with $FE. This procedure will 
clear the shot collision bit. If the result is 0, any col¬ 
lisions were with dead bad guys and can be ignored. 
Otherwise, the result will be shifted to the right one 
bit in preparation for the software collision check 
loop. This value will be place in BUF for use in the 
following routine. 

BUF is rotated right to check the least signifi¬ 
cant bit. Because this bit is rotated into the CARRY 
bit, it can be checked with a BCC instruction. If the 
carry bit is clear, there was no collision with this 
sprite, and a branch will be taken to the end of the 
loop. If the sprite was involved in a collision, its ex¬ 
plosion register will be checked to see if the bad guy 
was already dead. At this point, after it has been 
determined that the bad guy is alive and has been 
involved in a collision, it must be whether or not the 


bad guy is near enough to the player’s shot to have 
been hit. An offset is added to the bad guy’s ver¬ 
tical position, and the shot vertical position is sub¬ 
tracted from it. The result is then compared to a 
value that corresponds to the height of the bad guy. 
If the carry bit is clear, the bad guy was within range 
of the shot vertically. The horizontal position is 
checked in the same way. 

If both the horizontal and vertical positions of 
the bad guy are in range, the bad guy was hit. A 
value is then loaded into the appropriate MEANE 
explosion timer register. The shadow registers for 
voice channel 2 of the SID chip are initialized to the 
values that will cause an explosion. The number of 
points for the bad guy is then calculated and added 
into the score. Before the addition takes place, the 
decimal mode is set. After the new score is 
calculated, the decimal mode must be cleared. 
Failure to clear the decimal mode will lead to er¬ 
ratic operation of the program. Before exiting the 
routine, the player’s shot is disabled so that it can’t 
hit more than one bad guy. 

Seeing If the Player is Hit 

Since the bad guys shots are drawn into the 
background and the player is a sprite, a collision can 
be detected between the two by checking the sprite 
to background collision register (SBCOL) in the VIC 
chip. During INTO, the data is transferred from the 
VIC chip into TMBCOL so that it will be available 
for use when needed. This routine checks bit 0 of 
TMBCOL and if it is set, initiates the explosion se¬ 
quence for the player. Before the explosion sequence 
is initiated, the player explosion register is 
checked to make sure that the player is not already 
dead. The shadow registers for voice 1 are set to 
the proper values for an explosion, and LIVES is 
decremented. A value is stored into the explosion 
times to both force a delay before the next player 
appears and to allow time for the explosion to be 
seen. 

Launching the Shots 

Once very four screens, the program will try to 
launch a shot for the bad guys. The SHOTS register 
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is loaded, shifted right, and then ANDed with 
WHOLIV. The resulting byte had a bit set for every 
bad guy who is both alive and doesn’t have a shot 
in flight. This byte is stored in BUF for use in the 
following loop. 

In the shot launching loop, BUF is rotated right. 
If the CARRY bit is clear, the routine branches to 
the end of the loop. With the CARRY bit set, the 
routine has a chance to launch a shot. The Y register 
is loaded with LEVEL. The ACCUMULATOR is 
then loaded with a value from FIRPOW indexed by 
Y. This value is compared to RAND2. If RAND2 
is less than the value from FIRPOW, the routine will 
try to launch a shot. As at last check before laun¬ 
ching a shot, the appropriate explosion register is 
checked. If the bad guy is not exploding, the shot 
will be launched. The appropriate bit in SHOTS is 
set to indicate that the shot is in flight. Shot X and 
Y positions are taken form the bad guy. An offset 
is added into the vertical position before storing the 
value into the shot vertical register. A random 
number, which is masked and used as an index in¬ 
to a table of shot directions is loaded. This value 
is stored into the shot direction register. The shot 
X and Y coordinates are loaded into XPNT and 
YPNT in preparation for plotting the shot on the 
screen. A jump to the XPLOT subroutine, which 
will exclusively OR the shot to the screen, is then 
executed. 

Voice channel 2 is set up to generate a tone to 
indicate that a shot has been launched. A frequen¬ 
cy is chosen depending on the number of the bad 
guy who launched the shot. A higher tone will be 
generated for a higher bad guy number. After the 
sound generator is enabled, a jump is executed past 
the end of the loop. 

Moving the Bad Guys’ Shots 

In order to move one of the bad guys’ shots, it 
must first be unplotted from the old position and 
then replotted in the new position. SHOTS is used 
to determine whether or not a shot is in flight by 
storing it in BUF and rotating BUF to the right. If 
the carry bit is set, a shot is in flight. 

The X and Y position of the shot is moved to 
XPNT and YPNT before the jump to the XPLOT 


subroutine. After the shot is unplotted, the shot 
direction is placed in BUF1. This byte is rotated 
right, and if the carry bit is set, the shot’s position 
is incremented in the proper direction. The lower 
three bits of the shot direction register represent 
the directions up, down, and left starting from the 
least significant bit. A bad guy will never shoot to 
the right. The speed of the shot is determined by 
the SPEEDV and SPEEDH tables indexed by 
LEVEL. 

Moving the Player’s Shot 

Moving the player’s shot is much easier than 
moving the bad guys’ shots. Since the player’s shot 
is a sprite, it can be moved by changing its horizon¬ 
tal position. SHOTS is checked to see if a shot is 
in flight. If it is, SHOTS is incremented twice. 

Checking the Shot Positions 

The horizontal position of the player’s shot is 
checked first. If the shot is in flight, and this check 
reveals that it has reached the right side of the 
screen, its bit in SHOTS is cleared. 

The bad guys’ shots must also be checked to 
see if they have reached the right side, the top, or 
the bottom. If the shot has reached one of the limits, 
the shot is unplotted, and its bit in SHOTS is 
cleared. 

Animating the Sprites 

All the sprites in this game use four sprite pat¬ 
terns to achieve animation. The sprite pattern is 
changed once every 16/60 of a second. The lower 
two bits of the sprite pointers determine which of 
the four patterns will be shown at any given time. 
This routine strips the lower two bits from the sprite 
pointer, increments them, and recombines the result 
with the pointer, pointing at the next sprite in the 
sequence. 

Displaying the Number of Lives 

This routine uses the same technique as the 
display score routine to display the number of lives 
remaining. The value in LIVES is shifted left and 
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used as an index into the table of number addresses. 
A short loop is then used to move the $10 bytes of 
data, which form a number, to the screen starting 
at $60C0. 

Resetting the Game 

In case you want to reset the game before it is 
over, this routine has been provided. It reads the 
value of joystick 2 and if the fire button is pressed, 
jumps to START. 

Maintaining the Timing 

In order to maintain consistent timing for the 
entire main loop, the program must wait at this 
point for an interrupt to occur. Since the interrupts 
occur every 1/60 of a second, they can be used to 
set the smallest timing unit. This routine works by 
loading ENABLE with $00. ENABLE is then load¬ 
ed and checked until it is no longer $00. At this 
point, a jump is taken back to START, which is the 
top of the loop. ENABLE will be changed during 
the INTO interrupt routine. 

THE INTERRUPT ROUTINES 

INTO is the main interrupt routine for this pro¬ 
gram. When the program is initialized, a RASTER 
interrupt is set to occur on scan line $FB. This is 
the first line of border color at the bottom of the 
screen. At this point, any changes in the sprite and 
screen color registers will not be seen until the beam 
reaches the top of the visible portion of the screen. 
Since there is a large border at the top and the bot¬ 
tom of the screen, there is a lot of time to make 
changes to the various registers during this interval. 

When the RASTER interrupt is generated, the 
C-64’s operating system pushes the A, X, Y, and 
STATUS registers, as well as a return address, on¬ 
to the stack. After the registers have been saved, 
an indirect jump is taken through CINV, which was 
initialized to point at INTO. On entry to the INTO 
interrupt routine, the sprite collision registers are 
transferred into their temporary registers, 
TMSCOL and TMBCOL. The system timers are 
updated next. SCREEN and RANSEC are in¬ 
cremented, and RANSEC is checked for $3C. If 


RANSEC equals $3C, it is cleared and SECOND 
is incremented. 

After the timing is updated, the sprite control 
registers in the VIC chip are updated. The routine 
sets up a loop that will move the positions, colors, 
and sprite pointers for the mountain chain into the 
VIC chip. The MNTMSB register is moved into the 
XMSB register. All sprites are expanded in the X 
and Y direction, and the sprite multicolor mode is 
cleared. Since the beam has not yet reached the top 
of the visible portion of the screen, the mountain 
sprites will be all set up when the beam is in posi¬ 
tion to display them. 

Some more timing is taken care of next. If the 
player explosion register is not 0, it is decremented. 
Similarly, SNDTM1 and SNDTM2 are decremented 
if they are not 0. When either one reaches 0, the 
release sequence is started in its corresponding 
voice channel. The shadow registers of the SID chip 
registers are next transferred into their corre¬ 
sponding registers. 

A new random number is generated next. The 
lower two bits of SCREEN determine which of the 
four RAND registers will be updated with the new 
random number. Rather than simply transferring 
RANDOM into a RAND register, the random 
number is a combination of all of the RAND 
registers as well as RANDOM and RANSEC. This 
forces the random number to change no matter what 
frequency voice channel 3 is set to. 

The Player Controls 

Before the end of the INTO interrupt routine, 
the player’s joystick is checked, and the player 
moved if necessary. LIVES is checked first to verify 
that the player is still alive. If he is, PLAYE is check¬ 
ed to make sure that the player is not exploding. 
The player is moved on alternate screens as a way 
to keep his speed reasonably slow. The joystick data 
is loaded and inverted, and the upper four bits are 
masked to 0. If the lower four bits equal $F, the 
joystick is centered and the movement routine is 
bypassed. If the joystick was moved, the data is put 
in IBUF, where it will be rotated to determine the 
direction of movement. When the joystick data is 
rotated right, the lower four bits represent up, down, 
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left, and right respectively. The player is moved by 
rotating the joystick data to the right, and for each 
bit set, moving the player by one in the appropriate 
direction. Rather than simply using an INC instruc¬ 
tion, the player direction is changed using ADC and 
SBC instructions. This allows the new position to 
be checked to be sure that it is in bounds for the 
player before the new position is stored. 

After the player position has been adjusted, the 
joystick data is checked to see if the fire button has 
been pressed. If it has, SHOTS is checked to see 
if the shot is already in flight. PLAYE is also 
checked to prevent the player from shooting if he 
is exploding. IF a shot can be fired, bit one of the 
SHOTS register is set to one, indicating a shot in 
flight. The player position is transferred into the 
shot position after adding an offset corresponding 
to the players gun. SHOTSD is set to $08, indicating 
that the shot should go to the right. Voice 1 of the 
SID chip is then initialized to a shooting sound. 

Clear and Pull 

At the end of the interrupt routine, the inter¬ 
rupt vector CINV is set to point at INTI. A 
RASTER interrupt is enabled to occur on scan line 
$54, which corresponds to the bottom of the moun¬ 
tains. A $01 is stored in ENABLE so that the main 
loop may exit its hold loop and execute the code 
once again. Use of the ENABLE register in this way 
prevents the main loop from running free, causing 
unpredictable timing in the program. The IPULL 
macro is used as the last instruction of the routine, 
clearing the video interrupts, restoring the A, X, and 
Y registers, and returning from the interrupt. 

INTI 

As this is another interrupt routine, all of the 
registers are pushed onto the stack before the 
routine is entered. Once in the routine, the sprite 
collision registers are cleared by loading them into 
the accumulator. After clearing the registers, 3 NOP 
instructions are executed. These are used as time 
delays to ensure that the beam is off the visible por¬ 
tion of the screen before the background color is 
changed to green. As in INTO, the sprite control 


registers in the VIC chip are updated with player 
and bad guy positions, colors, and sprite pointers. 
Since these horizontal positions are stored in an 
eight bit format, they must be expanded into nine 
bit values. This is accomplished by shifting the byte 
to the left and storing the byte in the sprite horizon¬ 
tal position register. If the CARRY bit is set by this 
operation, the corresponding bit is set in HMSB. 
In this case, HMSB is being used as a temporary 
register to generate a byte with all of the ninth bits 
of the sprite horizontal positions. After all of the new 
values have been loaded into the VIC chip, HMSB 
is transferred into the XMSB register. 

The player and his shot are displayed using the 
same sprite. When the player’s shot is enabled, the 
player will be displayed on even screens and the shot 
is displayed on odd screens. On odd screens, the 
shot position will be moved into the VIC registers, 
and the sprite pointer will be changed to point at 
a shot sprite. Bit 0 of XMSB is also changed accor¬ 
dingly. 

The sprite X and Y multipliers are cleared, and 
the multicolor sprite mode is enabled for all sprites. 
WHOLIV is loaded and shifted left, and bit 0, in¬ 
dicating the player sprite, is set. The resulting byte 
has a bit set for each of the sprites to be displayed. 
This value is stored in the sprite enable register, 
SPREN. 


Moving Mountains 

On each screen, the mountains move one pix¬ 
el to the left. When one of the mountain segment 
sprites leaves the visible portion of the screen on 
the left, it is moved past the visible portion of the 
screen on the right. In this way, the mountains ap¬ 
pear to move smoothly and continuously. A loop is 
set up to check the mountain sprite positions. The 
sprite horizontal position is unpacked from a nine 
bit number with the ninth bit in MNTMSB to a two 
byte number. If the sprite position if $0lE8, which 
is off the screen on the left, it is repositioned to 
$0170, which is off the screen to the right. 

After the mountains have been moved, the ex¬ 
plosion counters for the bad guys are checked. If 
one of the explosion timers is not 0, it is 
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decremented. When an explosion timer is 
decremented to 0, the appropriate bit in WHOLIV 
is cleared. This indicates that the bad guy should 
not be displayed any longer. 

Before the end of the interrupt routine, CINV 
is set to point at INTO, which is the next interrupt 
routine to be executed. A raster interrupt is en¬ 
abled to occur on scan line $FB, which is on the first 
scan line below the visible portion of the screen. 
Video interrupts are cleared, and the A, X, and Y 
registers are restored to their values before the in¬ 
terrupt. At this point, an RTI instruction is ex¬ 
ecuted, returning program execution to the point 
where the interrupt was generated. 

THE MOVEMENT SUBROUTINES 

There are four subroutines that are used to ad¬ 
just the bad guys' position registers. Each routine 
uses the appropriate ADC or SBC to change the 
value in the appropriate position register. Before it 
stores the new value into the position register, the 


new value is checked to be sure that it is in the 
proper range to be on the screen. These subroutines 
use the Y register as an index into the bad guy posi¬ 
tion registers. This allows the subroutines to be call¬ 
ed from within movement loops without any 
preparation other than the use of the Y register as 
the loop counter. 

AN END NOTE 

The last instruction in the program before the 
.END assembler directive is a NOP instruction. Due 
to a bug in the Commodore assembler, the instruc¬ 
tion counter does not always point to the last instruc¬ 
tion in the file. This will usually occur when the last 
instruction in the file is a macro call. To prevent this 
from being a problem, the NOP instruction forces 
the instruction counter to point a standard OP 
CODE past the last instruction in program. Even 
if the assembler doesn't save the last byte of the pro¬ 
gram, it will only be an instruction that is not even 
a part of the program. 
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Appendix A 


The entire instruction set for the 6510 microprocessor is described in this section. For each instruction, 
you are given the instruction name as well as a short description of what the instruction does. The STATUS 
bits affected by the instruction are shown, followed by a long description of the instructions’ operation. 
Below these is a chart of the addressing mode options for the instruction, the code, format, the number 
of bytes the instruction requires, and the number of clock cycles the instruction requires to execute. For 
certain instructions, an asterisk appears in the column following the number of clock cycles. This in¬ 
dicates that you must add one to the number of cycles if the operation crosses a page boundary. The 
instructions are arranged alphabetically in this section. 
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ADC 


Add memory to accumulator with carry. 


NZ C I DV 
*** * 

The data in the ACCUMULATOR is added to the immediate data or the data in the specified 
memory location. The CARRY bit is added into bit 0 of the result. If the result exceeds 8 bits, 
the CARRY bit will be set after the addition. 

If the DECIMAL mode is set, the addition will be performed treating the data as binary 
coded decimal data. In this mode, the carry bit will be set for results over 99. 


Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 

IMMEDIATE 

69 

ADC 440PER 

2 

2 

ZERO PAGE 

65 

ADC OPER 

2 

3 

ZERO PAGE ? X 

75 

ADC OPER,X 

2 

4 

ABSOLUTE 

6D 

ADC OPER 

3 

4 

ABSOLUTE,X 

7D 

ADC OPER,X 

3 

4 * 

ABSOLUTE,Y 

79 

ADC OPER,Y 

3 

4 * 

<INDIRECT.X) 

61 

ADC < OPER,X) 

2 

6 

<INDIRECT),Y 

71 

ADC < OPER). Y 

2 

5 * 

AND 

AND memory 

with accumulator. 







N Z C I D V 





** 

A logical AND is performed between the data in the ACCUMULATOR and the immediate 

data or the data in the specified memory location. 



Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 

IMMEDIATE 

29 

AND 14 OPER 

2 

2 

ZERO PAGE 

25 

AND OPER 

2 

3 

ZERO PAGE.X 

35 

AND OPER.X 

2 

4 

ABSOLUTE 

2D 

AND OPER 

3 

4 

ABSOLUTE,X 

3D 

AND OPER.X 

3 

4 * 

ABSOLUTE.Y 

39 

AND OPER,Y 

3 

4 * 

<INDIRECT.X) 

21 

AND <OPER.X) 

2 

•±« 

<INDIRECT).Y 

31 

AND <OPER),Y 

2 

5 
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ASL 


Shift one bit left. 


NZC.IDV 
* ** 

The contents of the ACCUMULATOR or the specified memory location are shifted left 
one bit. The most significant bit is shifted into the CARRY bit and the least significant bit is 
cleared. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

ACCUMULATOR 

0A 

ASL A 

1 

2 

ZERO PAGE 

86 

ASL OPER 

2 

5 

ZERO PAGE , X 

16 

ASL OPER «.X 

2 

6 

ABSOLUTE 

8E 

ASL OPER 

3 

6 

ABSOLUTE, X 

IE 

ASL OPER .X 

3 


BCC Branch on carry clear. 







N Z C I D V 

A branch is performed if the CARRY bit is clear. 



Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 

RELATIVE 

98 

BCC OPER 

2 

2 

BIT 

Test bits in memory with accumulator. 






N Z C I D V 





*7* Mr 

The contents of the ACCUMULATOR are logically ANDed with the specified memory loca- 

tion, but the result of the operation is not stored. Bit 7 of the result is stored in the NEGATIVE 

bit of the STATUS register and bit 6 of the result is stored in the OVERFLOW bit of the STATUS 

register. 





Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 


ZERO PAGE 24 BIT OPER 

ABSOLUTE 20 BIT OPER 


3 

4 


3 
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BCS 


Branch on carry set 


N Z C I D V 


A branch is performed if the CARRY bit is set. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

RELATIVE 

B0 

BCS OPER 

2 

2 

BEQ 

Branch 

on result zero. 


N Z C I D V 

A branch is 

performed if the ZERO bit is set. 



Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

RELATIVE 

F0 

BEQ OPER 

2 

2 

BMI 

Branch on result minus. 







N Z C I D V 

A branch is performed if the NEGATIVE bit is set. 



Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

RELATIVE 

30 

BMI OPER 

2 

2 
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BNE 


Branch on result not zero. 


N Z C I D V 


A branch is performed if the ZERO bit is clear. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. No. 

Bytes Cycles 

RELATIVE 

D0 

BNE OPER 

2 2 

BPL 

Branch on result plus. 





N Z C I D V 

A branch is performed if the NEGATIVE bit is clear. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. No. 

Bytes Cycles 

RELATIVE 

10 

BPL OPER 

2 2 

BRK 


Force break. 

N Z C I D V 

The break command is used to initiate an interrupt under software control. This command 
can’t be masked by the interrupt disable bit. By examining bit 4 of the status register, you 
can determine whether the interrupt routine was initiated through a break command or an ex¬ 
ternal interrupt. 

Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. No. 

Bytes Cycles 

IMPLIED 

00 

BRK 

1 7 
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BVC 


Branch on overflow clear. 


N Z C I D V 


A branch is performed if the OVERFLOW bit is clear. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

RELATIVE 

50 

BVC OPER 

2 

2 

BVS 

Branch on overflow set. 






N Z C I D V 

A branch is performed if the OVERFLOW bit is set. 



Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 

RELATIVE 

70 

BVS OPER 

2 

2 

CLC 

Clear carry bit. 






N Z C I D V 





0 

CLC clears the CARRY bit in the STATUS register. 



Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 

IMPLIED 

i 8 

CLC 

i 

2 
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CLD 


Clear decimal mode. 


N Z C I D V 
o 


CLD clears the DECIMAL mode bit in the STATUS register. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

IMPLIED 

D8 

CLD 

1 

2 

CLI 

Clear 

interrupt disable bit. 


N Z C I D V 

0 

CLI clears the INTERRUPT DISABLE bit in the STATUS register. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

IMPLIED 

58 

CLI 

1 

2 


CLV 


Clear overflow bit. 


N Z C I D V 

0 

CLV clears the OVERFLOW bit in the STATUS register. 



Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

IMPLIED 

B8 

CL V 

i 

2 
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CMP 


Compare memory and accumulator. 


N Z C I D V 
*** 

The immediate data or the data in the specified memory location are subtracted from the 
ACCUMULATOR. The result is not stored, but the bits in the STATUS register are affected. 
The flags are affected as follows: 

A < MEMORY CARRY = CLEAR 

A = MEMORY ZERO = SET CARRY = SET 

A >= MEMORY ZERO = CLEAR CARRY = SET 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

IMMEDIATE 

c? 

CMP 

#OPER 

2 

2 

ZERO PAGE 

C5 

CMP 

OPER 

2 

3 

ZERO PAGE,X 

D5 

CMP 

OPER.X 

2 

4 

ABSOLUTE 

CD 

CMP 

OPER 

3 

4 

ABSOLUTE,X 

DD 

CMP 

OPER ,X 

3 

4 * 

ABSOLUTE,Y 

D9 

CMP 

OPER, Y 

3 

4 * 

<INDIRECT,X> 

Cl 

CMP 

< OPER,X) 

2 

6 

(INDIRECT),Y 

D1 

CMP 

(OPER) ? Y 

2 

5 * 


CPX 


Compare memory and X register. 


N Z C I D V 
*** 

The immediate data or the data in the specified memory location are subtracted from the 
X REGISTER. The result is not stored, but the bits in the STATUS register are affected. The 
flags are affected as follows: 

X < MEMORY CARRY = CLEAR 

X = MEMORY ZERO = SET CARRY = SET 

X >= MEMORY ZERO = CLEAR CARRY = SET 


Addressing 

OP 

Instruction 

Mode 

Code 

Format 

IMMEDIATE 

E0 

CPX 

#OPER 

ZERO PAGE 

E4 

CPX 

OPER 

ABSOLUTE 

EC 

CPX 

OPER 


No. 

Bytes 


No. 

Cycles 
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2 

2 

3 


3 

4 


CPY 


Compare memory and Y register. 


N Z C I D V 
*** 


The immediate data or the data in the specified memory location are subtracted from the 
Y REGISTER. The result is not stored, but the bits in the STATUS register are affected. The 
flags are affected as follows: 

Y < MEMORY CARRY = CLEAR 

Y = MEMORY ZERO = SET CARRY = SET 

Y > = MEMORY ZERO = CLEAR CARRY = SET 


Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 

IMMEDIATE 

C0 

CPY #OPER 

2 

2 

ZERO PAGE 

C4 

CPY OPER 

2 

3 

ABSOLUTE 

CC 

CPY OPER 

3 

4 

DEC 

Decrement 

memory by one. 


N Z C I D V 

** 

DEC decrements the specified memory location by one. 




Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

ZERO PAGE 

C6 

DEC 

OPER 

2 

5 

ZERO PAGE,X 

06 

DEC 

OPER,X 

2 

6 

ABSOLUTE 

CE 

DEC 

OPER 

3 

6 

ABSOLUTE,X 

DE 

DEC 

OPER ,X 

3 

7 
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DEX 


Decrement X register by one. 


N Z C I D V 
** 


DEX decrements the contents of the X register by one. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

IMPLIED 

CA 

DEX 

1 

2 

DEY 

Decrement Y register by one. 





N Z C I D V 




** 

DEY decrements the contents of the Y register by one. 



Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 

IMPLIED 

88 

DEY 

1 

2 

EOR 

Exclusive-OR memory with accumulator. 





NZ C I DV 




** 

EOR performs an exclusive OR between the ACCUMULATOR and the immediate data 

or the specified memory address. 




Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 


IMMEDIATE 

4? 

EOR 

#QPER 

2 

2 

2ER0 PAGE 

45 

EOR 

OPER 

2 

3 

ZERO PAGE,X 

55 

EOR 

OPER ,X 

2 

4 

ABSOLUTE 

4D 

EOR 

OPER 

3 

4 

ABSOLUTE,X 

5D 

EOR 

OPER ,X 

3 

4 * 

ABSOLUTE!Y 

5? 

EOR 

OPER, Y 

3 

4 * 

<INDIRECT,X) 

41 

EOR 

< OPER,X) 

2 

6 

<INDIRECT),Y 

51 

EOR 

< OPER) 5 Y 

2 

5 * 
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INC 


Increment memory by one. 


N Z C I D V 
** 


INC increments the specified memory address by one. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

ZERO PAGE 

E6 

INC OPER 

2 

5 

ZERO PAGE,X 

F 6 

INC OPER ,X 

2 

6 

ABSOLUTE 

EE 

INC OPER 

3 

6 

ABSOLUTE, X 

FE 

INC OPER,X 

3 

7 

INX 

Increment X register by one. 





N Z C I D V 




* * 

INX increments the contents of the X register by one. 



Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 

IMPLIED 

ES 

INX 

1 

2 

INY 

Increment Y register by one. 





N Z C I D V 




** 

INY increments the contents of the Y register by one. 



Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 


I NY 


IMPLIED 


C8 


1 


2 






JMP 


Jump to new location. 


N Z C I D V 

JMP changes the address in the program counter. Program execution continues at the new 
address. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

ABSOLUTE 

40 

JMP OPER 

3 

3 

INDIRECT 

6C 

JMP < OPER) 

3 

5 

JSR 

Jump to subroutine. 






N Z C I D V 

JSR changes the address in the program counter after pushing a return address onto the 

stack. Program execution continues at the new address. 



Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 

ABSOLUTE 

20 

JSR OPER 

3 

6 

LDA 

Load accumulator. 






NZ C I DV 




** 

LDA loads the ACCUMULATOR with data from the specified memory location. If the 

IMMEDIATE mode is specified, the data to be loaded will be the second byte of the instruction. 

Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 


IMMEDIATE 

A? 

LDA 

#GPER 

2 

2 

ZERO PAGE 

A5 

LDA 

OPER 

2 

3 

ZERO PAGE ,X 

B5 

LDA 

OPER, X 

2 

4 

ABSOLUTE 

AD 

LDA 

OPER 

3 

4 

ABSOLUTE, X 

BD 

LDA 

OPER ,X 

3 

4 * 

ABSOLUTE,Y 

B? 

LDA 

OPER, Y 

3 

4 * 

<INDIRECT, X) 

A1 

LDA 

< OPER ,X) 

2 

6 

<INDIRECT),Y 

B1 

LDA 

(OPER),Y 

2 

5 * 
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LDX 


Load X register. 


N Z C I D V 
** 


LDX loads the X REGISTER with data from the specified memory location. If the IM¬ 
MEDIATE mode is specified, the data to be loaded will be the second byte of the instruction. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

IMMEDIATE 

A 2 

LDX 

#OPER 

2 

2 

ZERO PAGE 

A 6 

LDX 

OPER 

2 

3 

ZERO PAGE,Y 

B6 

LDX 

OPER, Y 

2 

4 

ABSOLUTE 

AE 

LDX 

OPER 

3 

4 

ABSOLUTE,Y 

BE 

LDX 

OPER, Y 

3 

4 * 


LDY 


Load Y register. 


N Z C I D V 
** 


LDY loads the Y REGISTER with data from the specified memory location. If the IM¬ 
MEDIATE mode is specified, the data to be loaded will be the second byte of the instruction. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

IMMEDIATE 

A0 

LDY 

#OPER 

2 

2 

ZERO PAGE 

A4 

LDY 

OPER 

2 

3 

ZERO PAGE ? X 

B4 

LDY 

OPER, Y 

2 

4 

ABSOLUTE 

AC 

LDY 

OPER 

3 

4 

ABSOLUTE,X 

BC 

LDY 

OPER, Y 

3 

4 * 
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LSR 


Shift right one bit (memory or accumulator). 

N Z C I D V 
0 ** 


LSR shifts the ACCUMULATOR or the specified memory location to the right one bit. 
A 0 is shifted into the most significant bit, clearing the negative bit in the STATUS register. 
The least significant bit is shifted into the CARRY bit. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

ACCUMULATOR 

4A 

LSR 

A 

1 

2 

ZERO PAGE 

46 

LSR 

OPER 

2 

5 

ZERO PAGE,X 

56 

LSR 

OPER ,X 

2 

6 

ABSOLUTE 

4E 

LSR 

OPER 

3 

6 

ABSOLUTE,X 

5E 

LSR 

OPER ,X 

3 

7 


NOP 


No operation. 


N Z C I D V 


This instruction doesn’t do anything for 2 cycles. 


Addressing 

Mode 


Instruction 

Format 


No. 

Bytes 


No. 

Cycles 


IMPLIED 
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ORA 


OR memory with accumulator. 


N Z C I D V 
** 

ORA performs a logical OR between the ACCUMULATOR and the immediate data or 
the data in the specified memory location. 


Addressing 

Mode 


PHA 


OP 

Code 


Instruction 

Format 



Push accumulator on to stack. 


PHA pushes the ACCUMULATOR onto the stack. 


NZ C I D V 



IMPLIED 


08 


PHP 


1 


3 





PLA 


Pull accumulator from stack. 


N Z C I D V 
** 


PLA pulls the ACCUMULATOR off the stack. 


Addressing OP Instruction No. No. 

Mode_Code_Format_Bytes_Cycles 


IMPLIED 68 PLA 1 4 


PLP 


Pull status register from stack. 


N Z C I D V 
bom stack 


PLP pulls the STATUS byte off the stack.. 


Addressing OP Instruction No. No. 

Mode_Code_Format_Bytes_Cycles 


IMPLIED 28 PLP 1 4 


ROL 


Rotate memory or accumulator one bit left. 


N Z C I D V 
*** 

ROL rotates the ACCUMULATOR or the specified memory location one bit to the left 
through the CARRY bit. The CARRY bit is rotated into the least significant bit and the most 
significant bit is rotated into the CARRY bit. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

ACCUMULATOR 

2A 

ROL 

#OPER 

1 

2 

ZERO PAGE 

26 

ROL 

OPER 

2 

5 

ZERO PAGE,X 

36 

ROL 

OPER.X 

2 

5 

ABSOLUTE 

2E 

ROL 

OPER 

3 

6 

ABSOLUTE,X 

3E 

ROL 

OPER,X 

3 

7 
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ROR 


Rotate memory or accumulator one bit right. 


N Z C I D V 
*** 

ROR rotates the ACCUMULATOR or the specified memory location one bit to the right 
through the CARRY bit. The CARRY bit is rotated into the most significant bit and the least 
significant bit is rotated into the CARRY bit. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

ACCUMULATOR 

6A 

ROR 

#QPER 

1 

2 

ZERO PAGE 

66 

ROR 

OPER 

2 

5 

ZERO PAGE,X 

76 

ROR 

OPER ,X 

2 

6 

ABSOLUTE 

6E 

ROR 

OPER 

3 

6 

ABSOLUTE,X 

7E 

ROR 

OPER ,X 

3 

7 


Return from interrupt. 

N Z C I D V 

from stack 

RTI returns from an interrupt by pulling the STATUS byte off the stack and pulling the 
PROGRAM COUNTER off the stack. The values pulled from the stack were pushed onto the 
stack by the interrupt or BRK instruction. 


Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 


IMPLIED 40 RTI 1 

Return from subroutine. 




NZ C I DV 

RTS returns from a subroutine to the instruction following the jump to subroutine in¬ 
struction. 


Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 

IMPLIED 

60 

RTS 

1 

6 


93 




SBC 


Subtract memory from accumulator with carry. 


N Z C I D V 
*** * 


SBC subtracts the immediate data or the specified memory location from the AC¬ 
CUMULATOR using the CARRY bit as a borrow bit. This instruction will subtract the com¬ 
plement of the CARRY bit from the least significant bit of the ACCUMULATOR. 

If the DECIMAL mode is set, the data will be treated as binary coded decimal data. In 
this case, 99 is the highest value that can be represented in the ACCUMULATOR. As with 
the binary mode of operation, the CARRY bit will be cleared if the value goes below zero. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

IMMEDIATE 

E? 

SBC 

#OPER 

2 

2 

ZERO PAGE 

E5 

SBC 

OPER 

2 

3 

ZERO PAGE.X 

F5 

SBC 

QPER.X 

2 

4 

ABSOLUTE 

ED 

SBC 

OPER 

3 

4 

ABSOLUTE, X 

FD 

SBC 

OPER,X 

3 

4 * 

ABSOLUTE, Y 

F? 

SBC 

OPER.Y 

3 

4 * 

<INDIRECT,X) 

El 

SBC 

< OPER jX) 

2 

6 

< INDIRECT).Y 

FI 

SBC 

(OPER),Y 

2 

5 * 


SEC 


Set carry bit. 


N Z C I D V 

1 

SEC sets the CARRY bit in the STATUS register. 



Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

IMPLIED 

38 

SEC 

1 

2 


94 




SED 


Set decimal mode. 


N Z C I D V 
1 


SED sets the DECIMAL mode bit in the STATUS register. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

IMPLIED 

F8 

SED 

1 

2 

SEI 

Set interrupt disable bit. 





N Z C I D V 

l 

SEI sets the INTERRUPT DISABLE bit in the STATUS register. 


Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 

IMPLIED 

78 

SEI 

1 

2 

STA 

Store accumulator in memory. 





N Z C I D V 

STA stores the contents of the ACCUMULATOR into the specified memory location. 

Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 


ZERO PAGE 

85 

STA 

OPER 

2 

3 

ZERO PAGE ? X 

95 

STA 

OPER ,X 

2 

4 

ABSOLUTE 

8D 

STA 

OPER 

3 

4 

ABSOLUTE,X 

9D 

STA 

OPER ,X 

3 

5 

ABSOLUTE,Y 

99 

STA 

OPER, Y 

3 

5 

<INDIRECT,X> 

81 

STA 

< OPER,X) 

2 

£ 

<INDIRECT),Y 

91 

STA 

<OPER),Y 

2 

6 
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STX 


Store X register in memory. 


N Z C I D V 

STX stores the contents of the X REGISTER into the specified memory location. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

ZERO PAGE 

86 

STX OPER 

2 

3 

ZERO PAGE• Y 

96 

STX OPER,Y 

2 

4 

ABSOLUTE 

8E 

STX OPER 

3 

4 

STY 

Store Y register in memory. 





N Z C I D V 

STY stores the contents of the Y REGISTER into the specified memory location. 

Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 

ZERO PAGE 

84 

STY OPER 

2 

3 

ZERO PAGE ? X 

94 

STY OPER.X 

2 

4 

ABSOLUTE 

8C 

STY OPER 

3 

4 

TAX 

Transfer accumulator to X register. 





N Z C I D V 




** 

TAX transfers the data in the ACCUMULATOR to the X register. 


Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 

IMPLIED 

AA 

TAX 

1 

2 


96 


TAY 


Transfer accumulator to Y register. 


N Z C I D V 


TAY transfers the data in the ACCUMULATOR to the Y register. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

IMPLIED 

AS 

TAY 

1 

2 

TSX 

Transfer stack pointer to X register. 





NZCIDV 




** 

TSX transfers the current STACK POINTER to the X register. 


Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 

IMPLIED 

BA 

TSX 

1 

2 

TXS 

Transfer X register to stack pointer. 





NZCIDV 

TXS transfers the data in the X register to the STACK POINTER. 


Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 

IMPLIED 

9A 

TXS 

1 

2 
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TXA 


Transfer X register to accumulator. 


N Z C I D V 
** 


TXA transfers the data in the X register to the ACCUMULATOR. 


Addressing 

Mode 

OP 

Code 

Instruction 

Format 

No. 

Bytes 

No. 

Cycles 

IMPLIED 

SA 

TXA 

1 

2 

TYA 

Transfer Y register to accumulator. 





N Z C I D V 




** 

TYA transfers the data in the Y register to the ACCUMULATOR. 


Addressing 

OP 

Instruction 

No. 

No. 

Mode 

Code 

Format 

Bytes 

Cycles 

IMPLIED 

98 

TYA 

1 

2 
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Appendix B 


Descriptions of all the macros in the MACLIB file are in this section. Each description includes the macro 
name, the 6510 registers that are affected by calling the macro, a description of what the macro does, 
and the syntax of the instruction line. If a macro requires any parameters, they are described also. Most 
of the macros have been discussed elsewhere in the text of the book, and this section provides a quick 
reference guide to them. The macros are arranged alphabetically. 



ADRES 


registers destroyed a x y sp 

r*i ^ ^ 1 


ADRES loads a two byte address into memory locations. 


ADRES ?1,?2 

?l=Address to be loaded into memory. 
?2=Destination address of the address. 


ANOP REGISTERS DESTROYED A X Y SP 


This macro produces no code, but provides a convenient place to hang a label. 


ANOP 


ASL2 


REGISTERS DESTROYED A X Y SP 

1*1 I TJ 


ASL2 shifts a two byte value 1 bit to the left. 


ASL2 ?1 

?l=Address of the first of two bytes to shift left. 
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BANK 


REGISTERS DESTROYED A X Y SP 

"*1 I 


BANK selects the 16K bank of memory that the VIC chip can access. 


BANK ?1 

?l=Number of the bank to select. 

0=$0000-$3FFF 
1=*4000-*7FFF 
2=*S000-*BFFF 
3=*C0@0-*FFFF 


BGT 


REGISTERS DESTROYED A X Y SP 


A branch is performed if the CARRY bit is set and the ZERO bit is set. 
BGT ?1 


?l=Destination address for the jump. 


BLE 


REGISTERS DESTROYED A X Y SP 


A branch is performed if the CARRY bit is clear or the ZERO bit is set. 


BLE ?1 

Pl^Destination address for the jump. 
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BLNK 


REGISTERS DESTROYED 


A X Y SP 

*1 I 


BLNK blanks the screen to the border color. 

BLNK 


DBADC 


REGISTERS DESTROYED A X Y SP 

r*i i t "] 


DBADC adds one two byte value to another. 


DBADC ?1,'?2,?3 

?i=Address of the first number. 
?2=Address of the second number. 
?3=Destination address of result. 


DBDEC REGISTERS DESTROYED A X Y SP 

in ^ 


DBDEC decrements a two byte number by a specified value. 


DBDEC ?1,?2 
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?l=Address of the number to be decremented 
?2=Number to be subtracted. 








DBADCI 


REGISTERS DESTROYED A X Y SP 

■*1 ^ 


DBADCI adds a one byte number to a two byte number. 


DBADCI ?1,?2 J ?3 

?l=Address of the first number. 

?2=Immediate data or the address of the number to add. 
?3=Destination address of result. 


DBINC REGISTERS DESTROYED A X Y SP 

~*1 I 


DBINC increments a two byte number by a specified value. 


DBINC ?1,?2 

?l=Address of the number to increment. 
?2=Number to be added. 


DBPL REGISTERS DESTROYED A X Y SP 


DBPL decrements the X or Y register and branches if the NEGATIVE bit is clear. 
DBPL ?1,?2 . 

?i=X or Y to specify the register to be used. 

?2=Destination of the branch 

NOTE—Either the contents of the X register or the Y 
register will be altered depending on ?1. 
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DBSBC 


REGISTERS DESTROYED A X Y SP 



DBSBC subtracts one two byte value from another. 


DBSBC: ?i,?2,?3 

?l=Address of the first number. 
?2=Address of the number to subtract. 
?3=Destination address of result. 


DBSBCI 


REGISTERS DESTROYED 


A X Y SP 



DBSBCI subtracts a one byte number from a two byte number. 


DBSBCI ?1,?2,?3 

?l=Address of the first number. 

?2=Immediate data or the address of the number 
to subtract. 

?3=Destination address of result. 


DS 


REGISTERS DESTROYED A X Y SP 


DS defines a number of bytes to be allocated for data storage starting at the current 
program counter location. 


DS ?1 
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?l=Number of bytes to allocate. This macro should be 
preceded by a label. 





FILBYT 


REGISTERS DESTROYED 


A X Y SP 



FILBYT fills up to 255 bytes of memory with the same value. 


FILBYT ?1,?2,?3 

?l=Address of the first byte to fill. 
?2=Bata to load into memory. 

?3=Number of bytes to fill. 


FILL 


REGISTERS DESTROYED 


A X Y SP 


* * * 


FILL fills a number of 256 byte pages of memory with a value. 


FILL ?1,?2,?3 

?i=Address of the first byte to fill . 
?2=Bata to fill the area with. 
?3=Number of 256 byte pages to fill . 


GRABAS 


REGISTERS DESTROYED 


A X Y SP 

i n 


GRARAS sets the base address of graphics in the current bank. 


GRABAS ?1 


?l=The base address of graphics memory. This address 
must be a multiple of $0800. 
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GRAPH 


REGISTERS DESTROYED 


A X Y SP 

*1 I 


GRAPH enables a bit mapped graphics mode. 


GRAPH 


HDEC 


REGISTERS DESTROYED 


A X Y SP 


* * 


HDEC decrements a nine bit sprite position with the ninth bit in HMSB. The X register 
must contain the index number of the byte to decrement in an 8 byte array of horizontal 
positions. 

HDEC ?l 

?i=Base address of the horizontal position array. 


HINC 


REGISTERS DESTROYED 


A X Y SP 


* * 


HINC increments a nine bit sprite position with the ninth bit in HMSB. The X register 
must contain the index number of the byte to increment in an 8 byte array of horizontal 
positions. 
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HINC ?1 

?l=Base address of the horizontal position array. 







IPULL 


REGISTERS DESTROYED A X Y SP 


* * * 


IPULL restores the A, X, and Y registers to their original values before an interrupt 
routine and clears the video interrupt. 


IPULL 


JCC 


REGISTERS DESTROYED A X Y SP 


JCC causes a jump if the CARRY bit is clear. 


JCC ?1 

?l=Dest i nat i on address -for the jump. 


JCS 


REGISTERS DESTROYED A X Y SP 


JCS causes a jump if the CARRY bit is set. 


JCS ?1 

?l=Dest i nat i on address -for the jump. 
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JEQ 


REGISTERS DESTROYED A X Y SP 


JEQ causes a jump if the ZERO bit is set. 


JEQ ?1 

?l=Destination address for the jump. 


JGE 


REGISTERS DESTROYED A X Y SP 


JGE causes a jump if the CARRY bit is set. 


JGE ?1 


?l=Dest i nat i on address -for the .jump. 


JGT 


REGISTERS DESTROYED A X Y SP 


JGT causes a jump if the ZERO bit is clear and the CARRY bit is set. 


JGT ?1 

?l=Destination address -for the jump. 
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JLE 


REGISTERS DESTROYED A X Y SP 


JLE causes a jump if the CARRY bit is clear and the ZERO bit is set. 


JLE ?1 

?l=Destination address for the jump. 


JLT 


REGISTERS DESTROYED A X Y SP 


JLT causes a jump if the CARRY bit is clear. 


JLT ?\ 

?1—Destination address for the jump. 


JMI 


REGISTERS DESTROYED A X Y SP 


JMI causes a jump if the NEGATIVE bit is set. 

JMI ?1 

?l=Destination address for the jump. 
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JNE 


REGISTERS DESTROYED A X Y SP 


JNE causes a jump if the ZERO bit is clear. 


JNE ?1 

?l=Dest i nat i on address -for the jump. 


JPL 


REGISTERS DESTROYED A X Y SP 


JPL causes a jump if the NEGATIVE bit is clear. 


JPL ?1 


?l=Destination address -for the jump. 


LDMEM REGISTERS DESTROYED A X Y SP 

1*1 I I I 


LDMEM moves data from one location to another or loads an immediate value into 
memory using the accumulator. 


LDMEM ?1,72 
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?l=Immediate data or memory location to move. 
?'2=Dest i nat i on address. 







LDMEMX 


REGISTERS DESTROYED A X Y SP 

[1 *1 1 I 


LDMEMX moves data from one location to another or loads an immediate value into 
memory using the X register. 


LDMEMX ?1,?2 

?l=Immediate data or memory location to move. 
?2=Destination address. 


LDMEMY REGISTERS DESTROYED A X Y SP 

i r* 


LDMEMY moves data from one location to another or loads an immediate value into 
memory using the Y register. 

LDMEMY ?1,?2 

?l=Immediate data or memory location to move. 

?2=Destination address. 


LSR2 


REGISTERS DESTROYED A X Y SP 

r*T T i i 


LSR2 shift a two-byte value 1 bit to the right. 


LSR2 ?1 

?l=Address of the first of two bytes to shift right. 
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KILL 


REGISTERS DESTROYED 


A X Y SP 


* * 


KILL turns off the Commodore’s operating system: 

1. BASIC is disconnected. 

2. Joysticks are enabled for input. 

3. System timers are turned off. 

4. Raster interrupts are enabled. 

5. All pending interrupts are cleared. 

6. Page 0 of RAM is cleared. 

7. The NMI vector is set to point at an RTI 
instruction. 

KILL 


MULTOF 


REGISTERS DESTROYED 


A X Y SP 


* 

□ 

r 



MULTOF disables a multicolor graphics mode. 


MULTOF 


MULTON REGISTERS DESTROYED A X Y SP 

*1 


MULTON enables a multicolor graphics mode. 


MULTON 
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MVCOL 


REGISTERS DESTROYED 


A X Y SP 


* * * 


MVCOL fills color RAM with a value. 

MUCOL ?1 

?l=Ualue to fill color- RAM with. 


MVMEM 


REGISTERS DESTROYED 


A X Y SP 


* * * 


Moves a number of 256 byte pages of memory to a different area in memory. 


MUMEM ?1,?2,?3 

?l=Starting address of memory to move. 
?2=Destination address of data. 
?3=Number of 256 byte pages to move. 


NIBLL 


REGISTERS DESTROYED A X Y SP 


NIBLL shifts the lower byte of the accumulator into the upper byte. 


NIBLL 
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NIBLR 


REGISTERS DESTROYED A X Y SP 

1*1 I 1. 1 


NIBLR shifts the upper byte of the accumulator into the lower byte. 
NIBLR 


NOT 


REGISTERS DESTROYED A X Y SP 

*1 ^ ^ 


NOT complements the contents of the accumulator. 


NOT 


PUNPCK REGISTERS DESTROYED A X Y SP 

r* i i i 


PUNPCK unpacks a nine bit horizontal position into a two byte number. The X register 
must contain the index number of the byte to unpack in an 8 byte array of horizontal 
positions. 

PUNPCK ?1,?2,?3 

?l=Base address of the horizontal position array. 
?2=Address of the most significant bit register. 
?3=Destination of the unpacked bytes. 
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QDDEC 


registers destroyed 


A X Y SP 



QDDEC decrements a four byte number by a specified value. 


QDDEC ?1,?2 

?l=Address of the number to be decremented. 
?2=Number to be subtracted. 


QDINC REGISTERS DESTROYED A X Y SP 

~*1 ^ I 


QDINC increments a four byte number by a specified value. 
QDINC ?1,?2 

?l=Address of the number to increment. 
?2=Number to be added. 


RAST REGISTERS DESTROYED A X Y SP 

”*1 ^ ^ 


RAST enables the VIC chip to generate an interrupt on a specified scan line. 


RAST ?1 


?1=Immediate data or memory location that specifies the scan line on which to generate an 
interrupt. 
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SMNPC 


REGISTERS DESTROYED A X Y SP 

1*1 I u 


SMNPC unpacks a nine bit horizontal position into a one byte number. The X register must 
contain the index number of the byte to unpack in an 8 byte array of horizontal positions. The 
resulting single byte is the nine bit horizontal position divided by 2. 

SMNPC ?1,?2,?3 

?i=Address of the horizontal position register. 
?2=Address o-f the most significant bit register. 
?3=Destination of the unpacked byte. 


SMNPCX REGISTERS DESTROYED A X Y SP 

Mil I 


SMNPCX unpacks a nine bit horizontal position into a one byte number. The X register 
must contain the index number of the byte to unpack in an 8 byte array of horizontal positions. 
The resulting single byte is the nine bit horizontal divided by 2. 


SMNPCX ?1,?2,?3 

?i=Base address of the horizontal position array. 
?2=Address of the most significant bit register. 
?3=Destination of the unpacked byte. 


TEXT 


REGISTERS DESTROYED 


A X Y SP 

*1 ^ 


TEXT enables a character graphics mode. 
TEXT 
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TPDEC 


REGISTERS DESTROYED 


A X Y SP 

*T7.1. 


TPDEC decrements a three byte number by a specified value. 


TPDEC ?1,?2 

?i=Address of the number to be decremented. 
?2=Number to be subtracted. 


TPINC REGISTERS DESTROYED A X Y SP 

♦1 ^ ^ 


TPINC increments a three byte number by a specified value. 


TPINC ?1,?2 

?l=Address of the number to increment. 
?2=Number to be added. 


TXBAS REGISTERS DESTROYED A X Y SP 

* I 


TXBAS sets the base address of TEXT memory in the current bank. 


TXBAS ?1 

?l=Base address of TEXT. Must be a multiple of $0400. 


117 




UNBLNK 


REGISTERS DESTROYED A X Y SP- 

*111 


UNBLNK enables the screen display. 


UNBLNK 


UNPACK REGISTERS DESTROYED A X Y SP 

[♦Mil 


UNPACK unpacks a nine bit horizontal position into a two byte number. The X register 
must contain the index number of the byte to unpack in an 8 byte array of horizontal 
positions. 


UNPACK ?1,?2,?3 


?l=Address of the 
?2=Address of the 
?3=Destinetion of 


horizontal position register, 
most significant bit register, 
the unoacked bytes. 
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Appendix C 


In this section, you will find listings of all the source code files mentioned in the book. Memory dumps 
are provided for the binary files, such as sprites and lookup charts. Memory dumps are also provided 
for the assembled versions of the programs described in this book. 

If you are going to enter one of the binary files by hand, you must be sure to enter the data exactly 
as shown. Otherwise, the program may not run, or in the case of graphics, will not look right. 

Table C-l is a list of the programs in this Appendix. The type of each program and its loading ad¬ 
dress are also provided. A program can be one of the following types: 


Listing 

Number 

C-l 
C - 2 
C - 3 
C - 4 
C - 5 
C - 6 
C - 7 
C - 8 
C - 9 
C - 10 


Name 

Type 

Address 

BASA1 

MACLIB 

SRC 



SYSDEF 

SRC 



INTER-DEMO 

SRC 



INT DEMO.0 

BIN 

*1000 

4096 

SOUND 

SRC 



SOUND DEMO 

BIN 

*1000 

4096 

COMMON 

SRC 



SNDDEF 

SRC 



DATA 

SRC 



EDIT SND 

SRC 
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Listing 


Number 

Name 

Type 

Address 

BASADR 

C - 

11 

SOUND EDIT 

BIN 

*1000 

4096 

C - 

12 

KO-COM 

BAS 



C - 

13 

COM-KO 

BAS 



C - 

14 

DISPLAY PIC 

BAS 



c - 

15 

MVIT 

BIN 

*2000 

8192 

c - 

16 

PIC A CASTLE 

BIN 

*6000 


c - 

17 

SPRITE MAKER 

BAS 



c - 

18 

SLIB.O 

BIN 

*8000 


c - 

19 

CLSP2 

BIN 

*4000 


c - 

20 

SCREEN-MAKE 

BAS 



c - 

21 

CLBACK1 

BIN 

*6000 


c - 

22 

CLSP1 

BIN 

*4000 


c - 

23 

PHOENIX VI.4N 

BIN 

*8000 

32768 

c - 

24 

BOGHOP 

SRC 



c - 

25 

BOGHOP.O 

BIN 

*1400 

5120 

c - 

26 

BOGDEF 

SRC 



c - 

27 

BOGDAT 

SRC 



c - 

28 

XXPLOT 

SRC 



c - 

29 

LOOKUP 

BIN 

*1000 


c - 

30 

BOGSPR 

BIN 

*4000 


c - 

31 

OOPLOT 

SRC 




SRC An assembly language source code file. This type of file should be loaded by an 
assembler. 

BAS A BASIC program. This type of file can be loaded by entering LOAD“NAME”,8. The 
program can then be RUN. 

BIN A binary data file. This type of file can be loaded by entering LOAD“NAME”,8,1 or 
by a machine language monitor. If the file is a program, it can be run by entering 
SYS BASADR, where BASADR is the decimal address of where the program will 
be loaded. If the file is not a program, no BASADR will be listed. 


A short description of each of the files follows. 

Listing C-l, MACLIB, is the macro library source code. 

Listing C-2, SYSDEF, is a file of system definitions. 

Listing C-3, INTER-DEMO, is the source code for INT DEMO.O, a demonstration of the use of in¬ 
terrupts to change background colors. 

Listing C-4, INT DEM0.0 is the assembled version of INTER-DEMO. 

Listing C-5, SOUND, is the source code file for the SOUND DEMO program. 

Listing C-6, SOUND DEMO, is the assembled SOUND file, which can be run. 

Listing C-7, COMMON, is a file of musical definitions. 
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Listing C-8, SNDDEF, is a file of RAM definitions used by both SOUND and EDIT SOUND 

Listing C-9, DATA, is a data file used by SOUND. 

Listing C-10, EDIT SND, is the source code for the SOUND EDIT program. 

Listing C-ll, SOUND EDIT, is a screen editor for the SID chip. With this program, you can test sound 
effects in your program later. 

Listing C-12, KO-COM translates a Koala Pad picture filename into a more usable format. 

Listing C-13, COM-KO, translates a Koala Pad picture filename in the Commodore format to the Koala 
Pad format. 

Listing C-14, DISPLAY PIC, will display a Koala Pad picture on the screen if its name has been translated 
to the Commodore format. This program can display PIC A CASTLE. 

Listing C-15, MVIT, is a machine language subroutine used by DISPLAY PIC. This routine will display 
a picture once it is loaded into the computer. 

Listing C-16, PIC A CASTLE, is a Koala Pad picture file whose name has been translated to the Com¬ 
modore format. 

Listing C-17, SPRITE MAKER, is a utility program that aids in the design of sprites. 

Listing C-18, SLIB.0 contains some machine language routines that are called by the SPRITE MAKER 
program. 

Listing C-19, CLSP2, contains sprites used by the SPRITE MAKER program. 

Listing C-20, SCREEN-MAKE, is a utility program that is designed to aid in the design of character 
graphics screens. 

Listing C-21, CLBACK1, is a file that has the character set to be used by the SCREEN-MAKE program. 
You can add to this file or replace it with a character set of your own. If you replace this file, your 
new file must load into memory starting at $6000. 

Listing C-22, CLSP1, is a sprite used by the SCREEN-MAKE program. 

Listing C-23, PHOENIX Y1.4N, is a ready-to-run arcade style game. 

Listing C-24, BOGHOP, is the main code file for the game BOGHOP. 

Listing C-25, BOGHOP.O, is a ready-to-run arcade game that is fully described in Chapter 12. 

Listing C-26, BOGDEF, is a file of RAM variables used by the BOGHOP game. 

Listing C-27, BOGDAT, is a data file used by the BOGHOP game. 

Listing C-28, XXPLOT, is a point plotting subroutine. The LOOKUP file must be loaded and the variables 
defined, as in the beginning of the BOGHOP program, for this routine to work. Points are exclusively 
OR’d to the screen by this program. 

Listing C-29, LOOKUP, is a data file that is used by XXPLOT and OOPLOT. 

Listing C-30, BOGSPR, is a file of sprites used by the BOGHOP program. 

Listing C-31, OOPLOT, is a point plotting routine similar to XXPLOT. The only difference is that OOPLOT 
ORs as point to the screen instead of exclusively ORing it. 


Listing C-1: The MACLIB Source Code 


1000 

1010 

1020 

1030 

1040 

1050 

1060 

1070 


; PUT 11 30 : MACLIB 

•THIS IS A MACRO LIBRARY 
: IT SHOULD BE THE FIRST LIBRARY 
:LOADED 

; LATEST ADDITIONS 03/16/84 
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1030 : 


1090 : 


1100 

.MAC I PULL 

1110 

LDA #$FF 

1120 

STA UIRQ 

1 130 

PLA 

1140 

TAY 

1150 

PLA 

11 60 

TAX 

1170 

PLA 

1180 

RTI 

1 1 90 

.MND 

1200 ; 


1210 

.MAC KILL ;KILLS 0/S 

1220 

SEI 

1230 

LDMEM #$06.PORT ;DISCONNECT BASI 

1240 

LDA #$00 

1250 

STA ClANTI 

1260 

STA ClANT2 

1270 

LDA ClANTI 

1280 

LDA ClANT2 

1290 

LDA #$00 

1 300 

STA $DC02 sJOYSTICK ENABLE 

1310 

STA $DC03 

1320 

STA $DC0E :KILL TIMERS 

1 330 

STA $DC0F 

1340 

STA $DD0E 

1350 

STA $DD0F 

1 360 

LDMEM #$01 .L’lRQM : RAST I NT ONLY 

1370 

LDMEM #$FF.'v'IRQ ; CLEAR UID I NTS 

1380 

LDX #$02 

1390 

LDA #$00 

1400 ?4 

STA $00.X :CLEAR PAGE 0 

1410 

I NX 

1420 

BNE ?4 

1430 ; 


1440 

LDX #$FF 

1450 

TXS 

1460 

ADRES RET.NMINM 

1470 ; 


1430 

.MND 

1490 j 


1500 : 


1510 

.MAC ADRES ;SOURCE,DEST 

1520 

LDA #<?1 

1530 

STA ?2 

1540 

LDA #>?1 

1550 

STA ?2+1 

1560 

.MND 

1570 : 


1530 

.MAC DBINC sTWO BYTE INC 

1590 

LDA ?1 

1600 

CLC 

1610 

ADC #?2 

1620 

STA ?1 

1630 

LDA #$©0 

1 640 

ADC ?1+1 

1650 

STA ?1+1 

1 660 

.MND 
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; 2 BYTE DEC 


1670 ; 
1630 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 : 
1730 
1790 
1800 
1810 
1820 
1830 
1840 
1850 : 
I860 ; 
1870 
1 830. 
1890 
1900 : 
1910 ; 
1920 
1 930 
1940 
1950 
1 960 
1970 
1930 ?6 
1990 : 
2000 : 
2010 
2020 
2030 
2040 
2050 
2060 
20 70 
2030 
2090 
2100 
2110 
2120 
2130 ; 
2140 ?5 
2150 
2160 
2170 ?6 
2180 ; 
2190 
2200 
2210 
2220 
2230 
2240 ?4 
2250 


-MAC DBDEC 
LDA ?1 
SEC 

SBC #?2 
STA ?1 
LDA ?1+1 
SBC #*00 
STA ?1+1 
.MND 

.MAC RAST 
LDA ?i 
STA RASTER 
LDA YSCRL 
AND #*7F 
STA YSCRL 
.MND 


.MAC DS 
*=*+•? 1 
.MND 


.MAC HINC ;MSB OFFSET IN X 

INC ?1.X 

BNE ?6 

LDA HMSB 

ORA BITPOS.X 

STA HMSB 

.MND 


.MAC HDEC ;MSB OFFSET IN X 

DEC ?1.X 

LDA ?l’x 

CMP #*FF 

BNE ?6 

LDA HMSB 

AND BITPOS,X 

BNE ?5 

LDA HMSB 

ORA BITPOS ,X 

STA HMSB 

BNE ?6 :BRANCH ALWAYS 

LDA HMSB 
AND BITAND ,X 
STA HMSB 
.MND 

.MAC UNPACK 5 LOAD X —SRC.MSB.DST 

LDA ?2 

AND BITPOS ,X 
BEQ ?4 
LDA #*01 
STA ?3+1 
LDA ?1 
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2260 
2270 
2280 
2290 
2300 
2310 
2320 
2330 
2340 
2350 
2360 
2370 
2380 
2390 
2400 
2410 
2420 
2430 
2440 
2450 
2460 
2476 
248© 
2490 
2500 
2510 
2520 
2530 
2540 
2550 
2580 
2570 
2580 
2590 
260 0 
2610 
2620 
2630 
2640 
2650 
2660 
2670 
2680 
2690 
270 0 
2710 
2720 
2730 
2740 
2750 
2760 
2770 
2780 
2790 
2800 
2810 
2820 
2830 
2340 


ST A ?3 
.MND 

.MAC PUNPCK 
LDA ?2 

AND BITPOS ,X 
BEQ ?4 
LDA #*01 
?4 3TA ?3+1 

LDA ?1 ,X 
ST A ?3 
.MND 

.MAC SMNPC ;SRC,MSB,DST— 

LDA ?2 

AND BITPOS,X 
BEQ ?4 
LDA #*01 
?4 STA ?3 

ROR ?3 
LDA ?1 
ROR A 
ST A ?3 
.MND 

.MAC SMNPCX ;INDEXED BY X 

LDA ?2 

AND BITPOS,X 
BEQ ?4 
LDA #*01 
?4 STA ? 3 

ROR ?3 
LDA ?1.X 
ROR A 
ST A ?3 
. MND 


.MAC DBADC ;A,+B,=C 

LDA ?1 

CLC 

ADC ?2 
ST A ?3 
LDA ?1+1 
ADC ?2+1 
STA ?3+1 
.MND 

.MAC DEAD Cl 5 A:,+B,=C 

LDA ?i 

CLC 

ADC ?2 
ST A ?3 
LDA ?1+1 
ADC #*00 
STA ?3+1 
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2850 

.MND 


2860 ; 



2870 ; 



2880 

.MAC DBSBC 

;A,-B,=C 

2890 

LDA ?1 


2900 

SEC 


2910 

SBC ?2 


2920 

ST A ?3 


2930 

LDA ?1+1 


2940 

SBC ?2+1 


2950 

STA ?3+1 


2960 

.MND 


2978 s 



2980 

.MAC DBSBCI 

? A ? ~B ,=L- 

2990 

LDA ?! 


3000 

SEC 


3010 

SBC ?2 


3020 

STA ?3 


3030 

LDA ?1+1 


3040 

SBC #*00 


3050 

STA ?3+1 


3060 

.MND 


3070 ; 



3080 s 



30 90 

.MAC NIBLR 

5MOVE NIBBLE ! 

3100 

LSR A 


3110 

LSR A 


3120 

LSR A 


3130 

LSR A 


3140 

.MND 


3150 : 



3160 ; 



3176 

.MAC NIBLL 

-.MOVE NIBBLE ! 

318© 

ASL A 


3190 

ASL A 


3200 

ASL A 


3210 

ASL A 


3220 

.MND 


3230 ; 



3240 : 



3250 

.MAC ASL2 

5TWO BYTE ASL 

3260 

ASL ?1 


3270 

ROL ?1+1 


3280 

.MND 


3290 ; 



3300 : 



3310 

.MAC LSR2 

sTWG BYTE LSR 

3320 

LSR ?1 


3330 

ROR ?1+1 


3340 

.MND 


3350 s 



3360 : 



3370 

.MAC BGT 

IBRAANCH IF > 

3380 

BEQ ?4 


3390 

BCS ?1 


3400 ?4 

.MND 


3410 ; 



3420 : 



3430 

.MAC BLE 

5 BRANCH IF <= 
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3440 
3450 
3460 
3470 s 
3480 j 
3490 
3500 
3510 
3520 
3530 ; 
3540 ; 
3550 
3560 
3570 
3580 
3590 ?4 
3600 ; 
3610. j 
3620 : 
3630 ; 
3640 ; 
3650 


BCC ?1 
BEQ ?1 
.MND 


.MAC DBNE 
DE?1 
BNE ?2 
.MND 


■MAC DJNE 
DE?1 
BEQ ?4 
JMP ?2 
.MND 


.MAC DBPL 


3660 
3670 
3680 
3690 ; 
3700 s 
3710 
3720 
3730 
3740 ?4 
3750 ; 
3760 ; 
3770 
3730 
3790 
3300 ?4 
3810 ; 
3820 : 
3830 
3840 
3850 
3860 ?4 
3370 i 
3880 ? 
3890 
3900 
3910 
3926 ?4 
3930 ; 
3940 : 
3950 
3960 
3970 
3980 
3990 ?4 
4000 : 
4010 ; 

4020 


DE?1 
BPL ?2 
.MND 


.MAC JCC 
BCS ?4 
JMP ?1 
.MND 


.MAC JCS 
BCC ?4 
JMP ?1 
.MND 


.MAC JEQ 
BNE ?4 
JMP ?1 
.MND 


.MAC JGE 
BLT ?4 
JMP ?1 
.MND 


.MAC JGT 
BEQ ?4 
BCC ?4 
JMP ?1 
.MND 


.MAC JLE 


; DEC BRANCH IF NOT 0 


; DEC BRANCH + 


? JUMP IF CARRY CLR 
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4030 


BEQ ?3 

4040 


BCS ?4 

4050 

?3 

JMP ?1 

4060 

?4 

.MND 

4070 

5 


4080 

: 


40 90 


.MAC JLT 

4100 


BCS ?4 

41 10 


JMP ?1 

4120 

?4 

.MND 

4130 

9 


4140 



4150 


.MAC JMI 

4160 


BPL ?4 

4170 


JMP ?1 

4180 

?4 

.MND 

4190 

5 


4200 



4210 


.MAC JNE 

4220 


BEQ ?4 

4230 


JMP ?1 

4240 

?4 

.MND 

4250 

5 


4260 



4270 


.MAC JPL 

4280 


BMI ?4 

4290 


JMP ?1 

4300 

?4 

.MND 

4310 

5 


4320 



4330 


.MAC LDMEM 

4340 


LDA ?1 

4350 


ST A ?2 

4360 


.MND 

4370 

: 


4380 

: 


4390 


.MAC LDMEM) 

440 0 


LDX ?1 

4410 


STX ?2 

4420 


.MND 

4430 

: 


4440 

; 


4450 


.MAC LDMEM- 

4460 


LDY ?1 

4470 


STY ?2 

4480 


.MND 

4490 

; 


4500 

; 


4510 


.MAC BANK 

4520 


LDA #$03 

4530 


STA *DD02 

4540 


SEC 

4550 


SBC #?1 

4560 


STA $DD00 

4570 


.MND 

4580 

: 


4590 

; 


4600 


.MAC ML'MEM 

4618 


ADRES ?l.Si 


;SRC,DST,SPACES 
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4620 
4630 
^640 
4650 
4660 
4670 
4630 
4690 
4700 
4710 
4720 
4730 
4740 
4750 
4760 
4770 
4780 
4790 
4300 
4810 
4320 
4830 
4840 
4850 
4360 
4870 
4880 
4890 
4900 
4910 
4920 
4930 
4940 
4950 
4960 
4970 
4930 
4990 
5000 
5010 
5020 
5030 
5040 
50 50 
5060 
50 70 
5030 

50 90 
5100 

51 10 
5120 
51 30 
5140 
5150 
5160 
5170 
5130 
5190 
520 0 


ADRES ?2,SCRDST 
LDY #*00 
LDX #*00 
LDA < SCRPT) .Y 
STA (SCRDST) ,Y 
I NY 

BNE ?5 
INC SCRPT +1 
INC SCRDST +1 
I NX 

CPX #?3 
BNE ?5 
.MND 


.MAC MYCOL ;COLOR 

ADRES *D800,SCRDST 
LDY #*00 
LDX #*00 
?4 LDA #?1 

?5 STA (SCRDST),Y 

I NY 

BNE ?5 
INC SCRDST +1 
LDA SCRDST +1 
CMP #*DC 
BNE ?4 
.MND 


.MAC FILL 
ADRES ?i,SCRDST 
LDY #*00 
LDX #*00 
?4 LDA #?2 

?5 'STA (SCRDST),Y 

I NY 

BNE ?5 
INC SCRDST +1 
I NX 

CPX #?3 
BNE ?4 
.MND 


.MAC FILBYT 
ADRES '? 1 . DST 
LDY #*00 
LDA #?2 

?4 STA (DST).Y 

I NY 

CPY #?3 
BNE ?4 
.MND 


.MAC ANOP 
.MND 
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5210 

5220 

5230 

5240 

5250 

5266 

5270 

5280 

5290 

5300 

5310 

5326 

5330 

5340 

5356 

5360 

5370 

5330 

5390 

5400 

5410 

5420 

5430 

5440 

5450 

5460 

5470 

5480 

5490 

5500 

5510 

5520 

5530 

5540 

5550 

5560 

5570 


.MAC TEXT 
LDA YCOPL¬ 
AND #$DF 
STA YSCRL 
■ MND 


.MAC GRAPH 
LDA YSCRL 
ORA #$20 
STA YSCRL 
.MND 


.MAC MULTON 
LDA XSCRL 
ORA #$10 
STA XSCRL 
.MND 


.MAC MULTOF 
LDA XSCRL 
AND #$EF 
STA XSCRL 
.MND 


.MAC BLNK 
LDA YSCRL 
AND #$EF 
STA YSCRL 
.MND 


.MAC UNBLNK 
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530 0 
5810 
5320 
5830 
5840 
5850 
5360 : 
5870 : 
5830 : 
5890 : 
5900 : 
5910 
5920 
5930 
5940 s 
5950 
5960 
5970 
5930 
5990 
6000 
6010 
6020 
60 30 
6040 
6050 
6060 
6070 : 
6030 5 
6090 
6100 
6110 
6120 
6130 
6140 
6150 
6160 
6170 
6180 
6190 
6200 
6210 
6220 
6230 
6240 5 
6250 ; 
6260 
6270 
6280 
6290 
6300 
6310 
6320 
6330 
6340 
6350 
6360 
6370 
6330 • 


STA BUF1 
LDA VI DBAS 
AND #*F 6 
ORA BUF1 
STA VI DBAS 
. MND 


.MAC NOT sCOMPLEMENTS ACC 

EOR #*FF 

.MND 

.MAC TPINC sTHREE BYTE INC 

LDA ?1 

CLC 

ADC #?2 
STA ?1 
LDA #*00 
ADC ?1+1 
STA ?1+1 
LDA #*80 
ADC ?1+2 
STA ?1+2 
.MND 


.MAC QDINC ;FOUR BYTE INC 

LDA ?1 

CLC 

ADC #?2 
STA ?1 
LDA #*00 
ADC* ?1 + 1 
STA ?1+1 
LDA #*00 
ADC ?1+2 
STA ?1+2 
LDA #*00 
ADC ?1+3 
STA ? 1 +3 
.MND 


.MAC TPDEC ;3 BYTE DEC 

LDA ?1 

SEC 

SBC #?2 
STA ?1 
LDA ?1+1 
SBC #*0-0 
STA ?1+1 
LDA ?1+2 
SBC #*00 
STA ?1+2 
.MND 
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6390 : 
6400 

.MAC QDDEC 

: 4 BYTE DEC 

6410 

LDA ?1 


6420 

SEC 


6430 

SBC #?2 


6440 

STA ?1 


6450 

LDA ?1+1 


6460 

sbc #*00 


6470 

STA ?1+1 


6480 

LDA ?1+ 2 


6490 

SBC #*00 


6500 

STA ?1+2 


6510 

LDA ?l+3 


6520 

SBC #*00 


6530 

STA ?l+3 


6540 

.MND 


6550 ; 
6560 ; 
6570 

.END 



Listing 

C-2: The SYSDEF Source Code 





1000 

; PUT"30 : SYSDEF" 

1 360 

XSCRL 

= 

*D 0 1 6 

1010 

5 


1370 

SPRYSZ 

= 

*D01 7 

1020 

;FOR THE COMMODORE-64 

1380 

VI DBAS 

= 

*D 6 1 8 

1030 

?SYSTEM DEFINITIONS 

1 390 

VI RQ 

= 

*D01 9 

1040 

; SYSDEF 

1400 

VIRQM 

= 

*D0 1A 

1050 

: 


i 40 

Gi'R ! ! J ST 


T r ’0 1 B 

1060 

5 


1420 

MLTSP 

= 

*D0 1 C 

1070 

JOY 1 

= *DC00 

1430 

SPRXSZ 

= 

*D01 D 

1030 

JOY 2 

= *DC01 

1440 

SSCOL 

= 

*D01 E 

1090 

DDRA 

= *DC02 

1450 

SBCOL 

= 

*D01 F 

.1100 

DDRB 

= *DC03 

1460 

: 



1110 

: 


1470 

BORCL 

= 

*D020 

1120 

5 VIC CHIP ADDRESSES 

1480 

BCOL0 

= 

*D021 

1130 

s 


1490 

BCGLi 

= 

*D022 

1140 

SPR0X 

= *D0 0 0 

1500 

BC0L2 

= 

*D023 

1150 

3PR0Y 

= *D001 

1510 

SPMCL0 

= 

*D025 

1 1 60 

SPR1X 

= *D002 

1520 

SPMCL1 

= 

*D026 

1170 

SPR1Y 

= *D003 

1530 

SPRCL0 

= 

*D027 

1 1 80 

SPR2X 

= *D004 

1540 

SPRCL1 

= 

*D028 

1 1 90 

SPR2Y 

= *D085 

1550 

SPRCL2 

= 

*D029 

1200 

SPR3X 

= *D006 

1560 

SPRCL3 

= 

*D02A 

1210 

SPR3Y 

= *D007 

1570 

SPRCL4 

= 

*D02B 

1220 

SPR4X 

= *D008 

1580 

SPRCL5 

= 

*D02C 

1 230 

SPR4Y 

= *D0 09 

1590 

SPRCL 6 

= 

*D02D 

1240 

S P R 5X 

= *D00A 

1600 

SPRCL7 

= 

*D02E 

1250 

SPR5Y 

= *D00B 

1610 

VIFRLO 

= 

*D400 :VOICE 

1260 

3PR6X 

= *D00C 

1620 

V1FRHI 

= 

*D40 1 

1270 

SPR 6 Y 

= *D00D 

1630 

V1PWLO 

= 

*D402 :VOICE 

1230 

SPR7X 

= *D00E 

1640 

V1PWHI 

= 

*D403 

1290 

SPR7Y 

= *D00F 

1650 

V1CORG 

= 

*D404 

1300 

XMSB 

= *D010 

1660 

VIATDC 

= 

*D405 

1310 

YSCRL 

= *D011 

1670 

V1SURL 

ss 

*D40 6 

1 320 

RASTER 

= *D012 

1680 

: 



1 330 

LPX 

= *D013 

1690 

V2FRL0 

= 

*D40 7 

1 340 

LPY 

= *D014 

1700 

V2FRHI 

= 

*D408 

1 350 

SPREN 

= *D015 

1710 

V2PWL0 

= 

*D409 


1 FREQ LO 
PULSE WIDTH 
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1720 

V2PWHI 

= 

SD40A 

20 50 

PUR PL 

= 

*4 



1730 

V2C0RG 

= 

*D40B 

20 60 

GREEN 

= 

*5 



1740 

U2ATDC 

= 

SD40C 

2070 

BLUE 

= 

* 6 



1750 

V2SURL 

= 

SD40D 

2080 

YE LOW 

= 

*7 



1766 

s 



2090 

0RN6E 

= 

* 8 



1770 

V3FRLQ 

= 

♦D40E 

2 1 0 0 

BROWN 

= 

*9 



1780 

V3FRHI 

= 

SD40F 

2110 

LTRED 

= 

*A 



1790 

V3PWL0 

= 

SD410 

2120 

GRAY 1 

= 

SB 



1800 

V3PWHI 

= 

♦ D411 

2130 

G RAY 2 

= 

SC 



1810 

V3C0RG 

- 

♦D412 

21 40 

LTGRN 

= 

*0 



1820 

VSATDC 

= 

♦ D413 

2150 

LTBLU 

= 

*E 



1830 

V3SURL 

= 

♦ D414 

21 60 

GRAYS 

= 

*F 



1840 

; 



2170 

OSYS 

= 

SEA 31 



1850 

FLCNLO 

= 

♦D415 

2180 

• 





I860 

FLCNHI 

= 

♦ D41 6 

2190 

• 





1870 

RESFLT 

= 

*0417 

2200 

CINV 

= 

* 0 31 4 

: INT 

SECTOR 

1880 

MQDVOL 

= 

♦D418 

2210 

NMINV 

= 

*0318 

sNMI 

VECTOR 

1890 

: 



2220 

PRTDIR 

= 

*00 

SPORT DIR 

1900 

SPOTX 

= 

SD419 

2230 

PORT 

= 

*01 

5 I/O 

PORT 

1910 

SPOTY 

= 

*D41A 

2240 

ClANTI 

= 

SDC0D 



1920 

RANDOM 

= 

*D41B 

2250 

ClANT2 

= 

SDD0D 



1930 

ENVLQP 

= 

*D41C 

2260 

SPRPT1 

= 

*5FF8 



1940 

: 



2270 

SPRPT2 

= 

*5FF9 



1 950 

s 



2280 

SPRPT3 

= 

*5FFA 



I960 

ORGVAL 

= 

*8000 

2290 

SPRPT4 

= 

*5FFB 



1970 

: 



2300 

SPRPT5 

= 

*5FFC 



1980 

5 



2310 

SPRPT 6 

= 

*5FFD 



1990 

: COLOR! 

S 


2320 

SPRPT7 

= 

*5FFE 



2000 

5 



2330 

SPRPT 8 

= 

*5FFF 



2010 

BLACK 

•- 

0 

2340 

TXSCRN 

= 

♦0400 



20 20 

WHITE 

= 

*i 

2350 

■ 





2030 

RED 

= 

*2 

2360 

5 





20 40 

CYAN 

= 

*3 

2370 


-END 




Listing C-3: The INTER-DEMO Program, Source Code for the INT DEMO.O Program 


1000 ;PUT"30 s INTER-DEMO" 

1010 ;LOAD"ASM ",8 
1020 ; 

1030 5 INTERRUPT DEMO 
1040 ; 

1050 ;T0 START THE DEMO FROM BASIC 
1060 :TYPE 'SYS 4096" 

1070 : 

1080 ;CREATED 7/17/34 

10 90 ; < C) COPYRIGHT 1984, STEVEN BRESS 
1100 ; 

1110 ;LATEST ADDITIONS 11/15/84 
1120 ;03s30 PM 
1130 s 

1140 .OPT NOLI ST,NOSYM 

1150 : 

1160 .PAGE 'MACRO LIBRARY' 

1170 .LIB MACLIB 

1180 .PAGE 'SYSTEM DEFINITIONS' 

1190 .LIB SYSDEF 

1200 s 

1210 .OPT LIST 
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1220 * 
1230 
1240 ; 
1250 
1260 ; 
1270 ; 
1280 RET 
1290 TOP 
1300 ; 
1310 
1320 
1330 
1340 

1350 TUI I D 
1360 5 
1370 ; 
1380 INT0 
1390 
1400 
1410 
1420 ; 
1430 ; 
1440 INTI 
1450 
1460 
1470 
1488 ; 
1490 
1500 


= $1000 
JMP TOP 

.PAGE 'INTERRUPT DEMO CODE" 


RTI 

SEI 


KILL 

ADRES INT0.CINV 

RAST #$96 

CLI 

JMP TUI ID 


; SHUT OFF OPERATING SYSTEM 
;CINL> POINTS TO INT0 
5 INTERRUPT AT MID SCREEN 
; CLEAR INTERRUPT DISABLE 
;MAIN PROGRAM DOES NOTHING 


LDMEM #BLUE,BCOL0 ;CHANGE BACKGROUND COLOR 
RAST #$FB :NEXT INTERRUPT AT BOTTOM 

ADRES INTljCINU ;POINT TO NEXT INTERRUPT 
I PULL :RETURN 


LDMEM #GREEN,BCOL0 ;CHANGE COLOR 
RAST #$96 jNEXT INTERRUPT AT MID SCREEN 

ADRES INT0,CINC ;POINT TO FIRST INTERRUPT 
I PULL ; RETURN 

NOP 

.END 


Listing C-4: The INT DEMO.O Program 

.:1000 4C 04 10 40 78 78 A9 06 

.:1008 85 01 A9 00 8D 0D DC 8D 

.:1010 0D DD AD 0D DC AD 0D DD 

.:1018 A9 00 8D 02 DC 8D 03 DC 

.:1020 8D 0E DC 8D 0F DC 8D 0E 

.:1028 DD 8D 0F DD A9 01 8D 1A 

.:1030 D0 A9 FF 8D 19 D0 A2 02 

.:1038 A9 00 95 00 E8 D0 FB A2 

.:1040 FF 9A A9 03 8D 18 03 A9 

.:1048 10 8D 19 03 A9 67 80 14 

.:1050 03 A9 10 8D 15 03 A9 96 

.:1058 8D 12 D0 AD 11 D0 29 7F 

Listing C-5: The SOUND Program, Source 

1000 s PUT"30:SOUND" 

1010 ;LOAD"ASM",8 
1020 : 

1030 ;SOUND EFFECTS 
1040 : 

1050 ;CREATED 6/30/84 
1060 sLATEST ADDITIONS 7/02/84 
1070 i<C> COPYRIGHT 1984, STEVEN 
BRESS 
1080 : 


.81060 8 D 11 D0 58 4C 64 10 A9 
.81068 06 8 D 21 D0 A9 FB 8 D 12 
.81070 D0 AD 11 D0 29 7F 8 D 11 
.81078 D0 A9 8 E 8 D 14 03 A9 10 
.s1080 8 D 15 03 A9 FF 8 D 19 D0 
. si 088 68 A 8 68 AA 68 40 A9 05 
.s1090 8 D 21 D0 A9 96 8 D 12 D0 
.si 098 AD 11 D0 29 7F 8 D 11 D0 
. s10A0 A9 67 8 D 14 03 A9 10 8 D 
. s10A8 15 03 A9 FF 8 D 19 D0 68 
.:10B0 A 8 68 AA 68 40 EA 00 00 


Code for the SOUND DEMO Program 

1690 .OPT LIST,NOSYM,NOGEN 

1100 .LIB MACLIB 

1110 .LIB SYSDEF 

1120 .LIB COMMON 

1130 .LIB SNDDEF 

1140 s 

1150 * = $1000 

1160 : 

1170 JMP TOP 

1180 : 
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1190 


.LIB DATA 

1780 


STA V3C0RG 

1200- 

: 


1790 

: 


1210 

; 


1800 


LDMEM #$00,ENABLE 

1220 

TOP 

SEI 

1810 

: 


1230 


KILL 

1820 

TWID1 

LDA ENABLE 

1240 


ADRES INT0.CINV 

1830 


BEQ TWID1 

1250 


RAST #$FB 

1840 


ASL WA'v'TYP 

1 260 


MVCOL WHITE 

1856 


BEQ WVDN 

1270 


FILL $0400,*20,*04 

1 860 


LDA WAVTYP 

1 280 


GRABAS $1300 

1870 


CMP #$20 

1290 

: 


1880 


BNE NXMSG1 

1300 



1890 


ADRES MSAW.SRC 

1310 


CL I 

1900 


JSR PRINT 

1320 

START 

ANQP 

1910 

NXMSG1 

CMP #$40 

1 330 


LDMEM #$10,WAVTYP 

1920 


BNE NXMSG2 

1340 

: 


1930 


ADRES MSQU.SRC 

1350 

;MIDDLE FREQUENCY BASE LINE 

1940 


JSR PRINT 

1 360 

:TRIANGLE WAVE 

1950 

NXMSG2 

CMP #$80 

1370 

: 


I960 


BNE NXMSG3 

1380 


ADRES MTRI,SRC 

1970 


ADRES MNOI.SRC 

1390 


JSR PRINT 

1980 


JSR PRINT 

1400 

: 


1990 

? 


1410 


LDMEM #$00,S3PWL0 

2000 

NXMSG3 

JMP NXTWAV 

1420 


STA V3PWL0 

2010 

: 


1430 


LDMEM #$08,S3PWHI 

2020 

5 


1440 


STA V3PWHI 

2030 

WVDN 

ANOP 

1450 


LDMEM #$0F,MMOD 

2040 

5 


1460 


STA MQDVOL 

2050 

5CHANGING PULSEWIDTH 

1470 


LDMEM #$00,RFIL 

2060 

5 


1480 


STA RESFLT 

2070 


SEI 

1490 


LDMEM #$00,FLCNLO 

2080 


LDMEM #$40,WAVTYP 

1500 


STA FLCNHI 

2090 


LDMEM #$00,V3ATDC 

1510 

9 


2100 


STA S3ATDC 

1520 


LDMEM #$77,S3ATDC 

2110 


LDMEM #$FF,V3SURL 

1530 


STA V3ATDC 

2120 


STA S3SURL 

1540 


LDMEM #$77,S3SURL 

2130 


ADRES MCPW,SRC 

1550 


STA V3SURL 

2140 


JSR PRINT 

1560 

; 


2150 


ADRES INT1,CINV 

1570 

NXTWAV 

LDMEM WAVTYP.S3C0RG 

2160 


CLI 

1580 


STA V3C0RG 

2170 


ADRES AN4,S3FRL0 

1590 


ADRES TUNES,N0TPT3 

2 i 80 


LDMEM S3FRL0,V3FRLQ 

1600 


LDY #$00 

2190 


LDMEM S3FRHI.V3FRHI 

1610 


LDA (NQTPT3),Y 

2200 

PWCHi 

DBDEC S3PWLO;$08 

1620 


STA S3FRL0 

2210 


LDMEM S3PWL0,V3PWL0 

1630 


STA V3FRLQ 

2220 


LDMEM S3PWHI,V3PWHI 

1640 


I NY 

2230 

; 


1650 


LDA (N0TPT3),Y 

2240 

; 


1660 


STA S3FRHI 

2250 


LDMEM #$00.ENABLE 

1670 


STA V3FRHI 

2260 

TWID2 

LDA ENABLE 

1680 


DBINC NOTPT3,$02 

2270 


BEQ TWID2 

1690 

5 


2280 


LDA S3PWL0 

1700 


ADRES TUNTM,N0TTM3 

2290 


ORA S3PWHI 

1710 


LDY #$00 

2300 


BNE PWCHI 

1720 


LDA (N0TTM3),Y 

2310 

: 


1 730 


STA SNDTM3 

2320 


LDMEM #$00,S3C0RG 

1 740 


DBINC N0TTM3,1 

2330 


STA V3C0RG 

1750 


LDA WAVTYP 

2340 

s 


1760 


ORA #$01 

2350 

: 


1770 


STA S3C0RG 

2360 

sCHANGING OCTAVES 
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2370 

• 


2960 

LDMEM S3FRL0,V3FRL0 

2380 


ADRES MGCTySRC 

2970 

LDMEM S3FRHI•V3FRHI 

2390 


JSR PRINT 

2980 ; 


2400 

. 


2990 CHAT 

LDMEM #*21,S3C0RG 

2410 


LDMEM #*20,WAVTYP 

3000 

STA V3C0RG 

2420 


ADRES OCTAVE,N0TPT3 

3010 

LDA S3ATDC 

2430 


ADRES 0CTTM.N0TTM3 

3020 

NIBLR 

2440 

; 


3030 

TAX 

2450 


ADRES INT0.CINV 

3040 

LDA ATLK,X 

2460 

• 


3050 

STA SNDTM3 

2470 


LDMEM #*20,S3CORG 

3060 ; 


2480 


STA V3C0RG 

3070 ; 


2490 

f 

3080 

LDMEM #*00,TIMOUT 

2500 

LDY #*00 

3090 TUID4 

LDA TIMOUT 

2510 


LDA (N0TPT3),Y 

3100 

BEQ TWID4 

2520 


STA V3FRL0 

3110 ; 


2530 


STA S3FRL0 

3120 

LDMEM #*20,S3C0RG 

2540 

9 


3130 

STA V3C0RG 

2550 


LDA <NQTTM3>,Y 

3140 

LDA S3ATDC 

2560 


STA SNDTM3 

3150 

CLC 

2570 

5 


3160 

ADC #*10 

2580 


I NY 

3170 

STA S3ATDC 

2590 


LDA <N0TPT3>,Y 

3180 

STA V3ATDC 

2600 


STA V3FRHI 

3190 

AND #*F0 

2610 


STA S3FRHI 

3200 

BNE CHAT 

2620 

5 


3210 ; 


2630 


DBINC N0TPT3,2 

3220 : 


2640 


DBINC N0TTM3,1 

3230 :CHANGE DECAY NEXT 

2650 

5 


3240 ; 


2660 


LDMEM #*77,V3ATDC 

3250 

ADRES MDEC,SRC 

2670 


STA S3ATDC 

3260 

JSR PRINT 

2680 


STA V3SURL 

3270 5 


2690 


STA S3SURL 

3280 

LDMEM #*01,WAVTYP 

2700 

• 

5 


3290 

LDMEM #*50iS3ATDC 

271 0 

: 


3300 

STA V3ATDC 

2720 


LDMEM #*21,V3C0R6 

3310 

LDMEM #*03 9 S3SURL 

2730 


STA 83C0RG 

3320 

STA V3SURL 

2740 

y 


3330 

ADRES CN4,S3FRL0 

2750 


LDMEM #*00.ENABLE 

3340 

LDMEM S3FRL0,V3FRL0 

2760 

TWID3 

LDA ENABLE' 

3350 

LDMEM S3FRHI,V3FRHI 

2770 


BEG TWID3 

3360 ; 


2780 

5 


3370 CHDC 

LDMEM #*219 S3C0RG 

2790 

; 


3380 

STA V3C0RG 

2800 

;CHANGING ATTACK TIME 

3390 

LDA S3ATDC 

2810 

: 


3400 

AND #*0F 

2820 


ADRES MATT,SRC 

3410 

TAX 

2830 


JSR PRINT 

3420 

LDA DCLK,X 

2840 

s 


3430 

STA SNDTM3 

2850 


SEI 

3440 5 


2860 


ADRES INTI f ClNV 

3450 

LDMEM #*00,TIMOUT 

2870 


CL I 

3460 TWID5 

LDA TIMOUT 

2880 

5 


3470 

BEQ TWID5 

2890 


LDMEM #*01,WAVTYP 

3480 

LDMEM #*20,S3C0RG 

2900 

5 


3490 

STA V3C0RG 

2910 


LDMEM #*05.S3ATDC 

3500 

LDA S3ATDC 

2920 


STA VSATDC 

3510 

CLC 

2930 


LDMEM #*03 ,V3SURL 

3520 

ADC #*01 

2940 


STA S3SURL 

3530 

STA S3ATDC 

2950 


ADRES BN4,S3FRL0 

3540 

STA V3ATDC 




3550 


AND #$0F 

4140 

LDA DCLK,X 

3560 


BNE CHDC 

4150 

STA SNDTM3 

3570 

s 


4160 ; 


3580 

5 


4170 

LDMEM #$00,TIMOUT 

3590 

:CHANGE SUSTAIN 

4180 TWID8 

LDA TIMOUT 

3600 

? 


4190 

BEQ TUIID8 

3610 


ADRES MSUS f SRC 

4200 ; 


3620 


JSR PRINT 

4210 

LDA S3SURL 

3630 

1 


4220 

CLC 

3648 


LDMEM #$20.V3ATDC 

4230 

ADC #$01 

3650 


STA S3ATDC 

4240 

STA S3SURL 

3660 


LDMEM #$00,S3SURL 

4250 

STA V3SURL 

3670 


STA U3SURL 

4260 

AND #$0F 

3680 


ADRES DN4,S3FRL0 

4270 

BNE CHRE 

3690 


LDMEM S3FRL0.L>3FRL0 

4280 ; 


3700 


LDMEM S3FRHI,M3FRHI 

4290 ; 


3710 



4300 :CHANGE LO PASS FILTER 

3720 

CHSU 

LDMEM #$21,S3C0RG 

4310 ; 


3730 


STA <J3C0RG‘ 

4320 

ADRES MFLO,SRC 

3740 


LDMEM #$ 01 .SNDTM3 

4330 

JSR PRINT 

3750 


LDMEM #$00 !TIMOUT 

4340 ; 


3760 

* 


4350 

LDMEM #$1F,MM0D 

3770 

TUI I D 6 

LDA TIMOUT 

4360 

STA MODVOL 

3780 


BEQ TWID 6 

4370 

LDMEM #$06,RESFLT 

3790 


LDMEM #$20.S3C0RG 

4380 

STA RFIL 

3800 


STA V3CGRG* 

4390 ; 


3810 


LDA S33URL 

4400 

ADRES $0000 f S3FRL0 

3820 


CLC 

4410 ' 

LDMEM S3FRL0,V3FRL0 

3830 


ADC #$10 

4420 

LDMEM S3FRHI,V3FRHI 

3840 


STA S3SURL 

4430 

ADRES $0000,S2FRL0 

3850 


STA V3SURL 

4440 

LDMEM S2FRL0,V2FRLQ 

3860 


AND #$F0 

4450 

LDMEM S2FRHI,V2FRHI 

3870 


BNE CHSU 

4460 ; 


3880 

; 


4470 

LDMEM #$00,FILLO 

3890 

:CHANGE RELEASE 

4480 

STA FLCNLO 

3900 

: 


4490 

LDMEM #$08,FILHI 

3910 


ADRES MREL.SRC 

4500 

STA FLCNHI 

3920 


JSR PRINT 

4510 5 


3930 

: 


4520 

LDMEM #$00,S3ATDC 

3940 


LDMEM #$F0.S3SURL 

4530 

STA V3ATDC 

3950 


STA L‘3SURL 

4540 

STA V2ATDC 

3960 


ADRES EN4,S3FRL0 

4550 

STA S2ATDC 

3976 


LDMEM S3FRL0.V3FRL0 

4560 

LDMEM #$F0,S3SURL 

3980 


LDMEM S3FRHI ,L‘3FRHI 

4570 

STA V3SURL 

3990 

: 


4580 

STA S2SURL 

4000 

CHRE 

LDMEM #$21,S3C0RG 

4590 

STA V2SURL 

4010 


STA M3C0RG 

4600 ; 


4020 


LDMEM #$01,SNDTM3 

4610 5 


4030 

; 


4620 

LDMEM #$21,S3C0RG 

4040 

j 


4630 

STA V3C0RG 

4050 


LDMEM #$00,TIMOUT 

4640 

STA S2C0RG 

4060 

TWID7 

LDA TIMOUT 

4650 

STA V2C0RG 

4070 


BEQ TWID7 

4660 CHLFL 

LDMEM #$00,ENABLE 

4080 

5 


4670 TWID9 

LDA ENABLE 

4090 


LDMEM #$20,S3C0RG 

4680 

BEQ TWID? 

4100 


STA M3C0RG 

4690 ; 


4110 


LDA S3SURL 

4700 

DBINC S3FRL0,$20 

4120 


AND #$0F 

4710 

DBDEC S2FRL0,$20 

4130 


TAX 

4720 

LDMEM S2FRL0,V2FRL0 
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4730 


LDMEM S2FRHI.V2FRHI 

5320 


LDA S3FRL0 

4740 


LDMEM S3FRL0,V3FRL0 

5330 


ORA S3FRHI 

4750 


LDMEM S3FRHI ,V3FRHI 

5340 


BNE CHBFL 

4760 


LDA S3FRL0 

5350 


STA S3C0RG 

4770 


ORA S3FRHI 

5360 


STA V3CQRG 

4780 


BNE CHLFL 

5370 


STA S2C0RG 

4790 

• 


5330 


STA V2C0RG 

4800 

5 CHANGE HIGH-PASS FILTER 

5390 

; 


4810 

• 

f 


5400 

:CHANGING RESONANCE 

4820 


ADRES MFHI,SRC 

5410 

5 


4830 


JSR PRINT 

5420 


ADRES MRES,SRC 

4840 

5 


5430 


JSR PRINT 

4850 


ADRES $0000,S3FRL0 

5440 

y 


4860 


ADRES $0000,S2FRL0 

5450 


LDMEM #$81,S3C0RG 

4870 


LDMEM S3FRL0,V3FRLO 

5460 


STA V3C0RG 

4880 


LDMEM S2FRL0,V2FRL0 

5470 


LDMEM #$80,FLCNHI 

4890 


LDMEM S3FRHI ,V3FRHI 

5480 


STA FILHI 

4900 


LDMEM S2FRHI,V2FRHI 

5490 


ADRES GN4.S3FRL0 

4910 


LDMEM #$4F,MMQD 

5500 


LDMEM S3FRL0 .L'SFRLO 

4920 


STA MODVOL 

5510 


LDMEM S3FRHI.V3FRHI 

4930 

; 


5520 


LDMEM #$1F,MMOD 

4940 

CHHFL 

LDMEM #$00 , ENABLE 

5530 


STA MODUOL 

4950 

TWIDA 

LDA ENABLE 

5540 

: 


4960 


BEQ TWIDA 

5550 

CHRES 

LDMEM #$01,SNDTM3 

4970 

; 


5560 


LDMEM #$00,TIMOUT 

4980 


DBINC S3FRL0,$20 

5570 

TUI I DC 

LDA TIMOUT 

4990 


DBDEC S2FRL0,$20 

5580 


BEQ TUI I DC 

5000 


LDMEM S2FRLO,V2FRL0 

5590 

; 


50 1 0 


LDMEM S2FRHI,V2FRHI 

5600 


LDA RFIL 

5020 


LDMEM S3FRL0,V3FRL0 

5610 


CLC 

50 30 


LDMEM S3FRHI,V3FRHI 

5620 


ADC #$10 

5040 


LDA S3FRL0 

5630 


STA RFIL 

50 50 


ORA S3FRHI 

5640 


STA RESFLT 

50 60 


BNE CHHFL 

5650 


AND #$F0 

50 70 

) 


5660 


BNE CHRES 

50 30 

:CHANGE BAND-PASS FILTER 

5670 

5 


5090 

? 


5680 

; RING 

MODULATION ON 

5100 


ADRES MFBA.SRC 

5690 

! 


5110 


JSR PRINT 

5700 


ADRES MRMO,SRC 

5120 

: 


5710 


JSR PRINT 

5130 


ADRES $0000,S3FRL0 

5720 

5 


5140 


ADRES $0000,S3FRL0 

5730 


LDMEM #$77,SIATDC 

5150 


LDMEM S3FRL0,V3FRL0 

5740 


STA VIATDC 

5160 


LDMEM S2FRL0.V2FRL0 

5750 


STA S1SURL 

5170 


LDMEM S3FRHI ,V3FRHI 

5760 


STA V1SURL 

5130 


LDMEM S2FRHI,V2FRHI 

5770 


STA S3ATDC 

5190 


LDMEM #$2F,MM0D 

5730 


STA V3ATDC 

5200 


STA MODVOL 

5790 


STA S3SURL 

5210 

! 


5800 


STA V3SURL 

5220 

CHBFL 

LDMEM #$00,ENABLE 

5810 


STA S2SURL 

5230 

TWIDB 

LDA ENABLE 

5820 


STA V2SURL 

5240 


BEQ TWIiDB 

5830 


STA S2ATDC 

5250 

5 


5840 


STA V2ATDC 

5260 


DBINC S3FRL0,$20 

5850 

5 


5270 


DBDEC S2FRL0,$20 

5360 


ADRES DS0,S3FRLO 

5280 


LDMEM S2FRL0,V2FRL0 

5870 


LDMEM S3FRL0,V3FRLQ 

5290 


LDMEM S2FRHI,V2FRHI 

5880 


LDMEM S3FRHI,V3FRHI 

5300 


LDMEM S3FRL0,V3FRLO 

5890 


LDA MMOD 

5310 


LDMEM S3FRHI,V3FRHI 

5900 


ORA #$80 




5910 

STA MODVOL 

6500 

i 


5920 

LDMEM #$2@,S3C0RG 

6510 

PRINT 

ANQP 

5930 

STA V3C0RG 

6520 


FILBYT $0590,$20,$28 

5940 

LDMEM #$14,SICORG 

6530 


ADRES $0590,DST 

5950 

ADRES INT0,CINV 

6540 


LDY #$00 

5960 

ACRES MODI.K jNOTPTl 

6550 

PRTLP 

LDA (SRC),Y 

5970 

ADRES MODTM,N0TTM1 

6560 


BEQ PRTND 

5980 

LDY #$00 

6570 


STA < DST),Y 

5990 

LDA <NOTPTl>,Y 

6580 


INY 

6000 

STA S1FRL0 

6590 


JMP PRTLP 

6010 

STA V1FRLO 

6600 

PRTND 

RTS 

6020 

LDA (NOTTMl),Y 

6610 

j 


6030 

STA SNDTM1 

6620 

$ 


6040 

I NY 

6630 

INT0 

SEI 

6050 

LDA <NOTPTl>,Y 

6640 


INC SCREEN 

6060 

STA S1FRHI 

6650 


INC RANSEC 

60 70 

STA V1FRHI 

6660 


LDA RANSEC 

6080 

DBINC NOTTMl,$01 

6670 


EOR #$3C 

6090 

DBINC NOTPT1,$02 

6680 


BNE SYNC1 

6100 ; 


6690 

5 


6110 

LDMEM #$15,SICORG 

6700 


STA RANSEC 

6120 

STA VICORG 

6710 


INC SECOND 

6130 ; 


6720 

5 


6140 

LDMEM #$00.ENABLE 

6730 

SYNC 1 

ANOP 

6150 TWIDD 

LDA ENABLE 

6740 

! 


6160 

BEG! TWIDD 

6750 


LDA SNDTM1 

6170 : 


6760 


BEQ DECTM1 

6180 ;CHANGING SYNCHRO!I2ATI ON 

6770 


DEC SNDTM1 

6190 : 


6780 


BNE DECTM1 

6200 

ADRES MSYN,SRC 

6790 


LDA SICORG 

6210 

•JSR PRINT 

6800 


AND #$FE 

6220 : 


6810 


STA SICORG 

6230 

LDMEM #$22,SICORG 

6828 


STA VICORG 

6240 

STA VICORG 

6830 


LDY #$00 

6250 

ADRES MODLK.NOTPTi 

6840 


LDA <NOTPTi>,Y 

6260 

ADRES MODTM,NOTTMl 

6850 


BNE MMUS1 

6270 

LDY #$00 

6860 


LDMEM #$01,ENABLE 

6280 

LDA <NOTPTI),Y 

6870 


JMP DECTM1 

6290 

STA S1FRLO 

6380 

5 


6300 

STA ViFRLO 

6890 

MMUS1 

STA S1FRLO 

6310 

LDA (NOTTMl),Y 

6900 


STA V1FRLO 

6320 

STA SNDTM1 

6910 


LDA’(NOTTMl),Y 

6330 

I NY 

6920 


STA SNDTM1 

6340 

LDA (NOTPTI),Y 

6930 


INY 

6350 

STA S1FRHI 

6940 


LDA (NOTPTI),Y 

6360 

STA V1FRHI 

6950 


STA S1FRHI 

6370 

DBINC NOTTMl,$01 

6960 


STA V1FRHI 

6380 

DBINC NOTPTI,$02 

6970 


DBINC NOTTMl,$01 

6390 ; 


6980 


DBINC NOTPTI,$02 

6400 

LDMEM #$23,SICORG 

6990 


LDA SICORG 

6410 

STA VICORG 

7000 


ORA #$01 

6420 

LDMEM #$00,ENABLE 

7010 


STA SICORG 

6430 TWIDE 

LDA ENABLE 

7020 


STA VICORG 

6440 

BEQ TWIDE 

7030 

DECTM1 

ANOP 

6450 ; 


7040 

5 


6460 ; 


7050 


LDA SNDTM3 

6470 

JMP TOP 

7060 


BEQ DECTM3 

6480 ; 


7070 


DEC SNDTM3 

6490 ; 


7080 


BNE DECTM3 
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7090 


LDMEM #$10.S3C0RG 

7420 

J 


7100 


STA V3C0RG 

7430 

n 


7110 


LDY #$00 

7440 

INTI 

SEI 

7120 


LDA (N0TPT3),Y 

7450 


INC SCREEN 

7130 


BNE MMUS3 

7460 


INC RANSEC 

7140 


LDMEM #$01,ENABLE 

7470 


LDA RANSEC 

7150 


JMP DECTM3 

7480 


EOR #$3C 

7160 

5 


7490 


BNE SYNC2 

7170 

MMUS3 

STA V3FRL0 

7500 

5 


7180 


STA S3FRL0 

7510 


STA RANSEC 

7190 


I NY 

7520 


INC SECOND 

7200 


LDA (N0TPT3),Y 

7530 

5 


7210 


STA V3FRHI 

7540 


LDA SNDTM3 

7220 


STA S3FRHI 

7550 


BEQ SYNC2 

7230 


DBINC N0TPT3,$02 

7560 


DEC SNDTM3 

7240 

5 


7570 


BNE SYNC2 

7250 


LDY #$00 

7580 


LDMEM #$01,TIMOUT 

7260 


LDA <NQTTM3>,Y 

7590 

$ 


7270 


STA SNDTM3 

7600 

SYNC2 

LDMEM #$01,ENABLE 

7280 


DBINC N0TTM3,1 

7610 

5 


7290 

$ 


7620 


LDA WAVTYP 

7300 


LDA WAVTYP 

7630 


CMP #$01 

7310 


ORA #$01 

7640 


BEQ LEAVE 

7320 


STA S3C0R6 

7650 


LDMEM #$40,V3CORG 

7330 


STA V3C0RG 

7660 


LDMEM #$41,S3C0RG 

7340 

; 


7670 

9 


7350 

DECTM3 

ANOP 

7680 

9 


7360 



7690 

LEAVE 

RAST #$FB 

7370 

;LDMEM 

#$01,ENABLE 

7700 


PULL 

7380 



7710 


NOP 

7390 


RAST #$FB 

7720 

\ 


7400 


PULL 

7738 

5 


7410 


NOP 

7748 


.END 


Listing C-6: The SOUND DEMO Program 


B* 










1080 

49 

4E 

47 

20 

4F 

43 

54 

41 


PC 

SR 

AC 

XR 

YR 

SP 





1088 

56 

45 

53 

00 

43 

48 

41 

4E 

. 

; C03E 

32 

00 

C3 

00 

F6 





1090 

47 

49 

4E 

47 

20 

41 

54 

54 

. 











1098 

41 

43 

4B 

20 

54 

49 

4D 

45 












10A0 

00 

43 

48 

41 

4E 

47 

49 

4E 












1 0A8 

47 

20 

44 

45 

43 

41 

59 

20 


: 1000 

4C 

4B 

12 

40 

28 

43 

29 

20 


10B0 

54 

49 

4D 

45 

00 

43 

48 

41 


: 1008 

43 

4F 

50 

59 

52 

49 

47 

48 


10B8 

4E 

47 

49 

4E 

47 

20 

53 

55 


S 1010 

54 

20 

31 

39 

38 

34 

2 C 

20 


10C0 

53 

54 

41 

49 

4E 

20 

4C 

45 


: 1018 

53 

54 

45 

56 

45 

4E 

20 

42 


1 0C8 

56 

45 

4C 

00 

43 

48 

41 

4E 


: 1020 

52 

45 

53 

53 

54 

52 

49 

41 


10D0 

47 

49 

4E 

47 

20 

52 

45 

4C 


: 1028 

4E 

47 

4C 

45 

20 

57 

41 

56 


1 0D8 

45 

41 

53 

45 

20 

54 

49 

4D 


: 1030 

45 

46 

4F 

52 

4D 

00 

53 

41 


10E0 

45 

00 

43 

48 

41 

4E 

47 

49 


: 1038 

57 

54 

4F 

4F 

54 

48 

20 

57 


1 0E8 

4E 

47 

20 

4C 

4F 

2D 

50 

41 


: 1040 

41 

56 

45 

46 

4F 

52 

4D 

00 


10F0 

53 

53 

20 

46 

49 

4C 

54 

45 


: 1048 

53 

51 

55 

41 

52 

45 

20 

57 


1 0F8 

52 

00 

43 

48 

41 

4E 

47 

49 


S 1050 

41 

56 

45 

46 

4F 

52 

4D 

00 


1100 

4E 

47 

20 

48 

49 

2D 

50 

41 


: 1058 

4E 

4F 

49 

53 

45 

20 

57 

41 


1108 

53 

53 

20 

46 

49 

4C 

54 

45 


: 1060 

56 

45 

46 

4F 

52 

4D 

00 

43 


1110 

52 

00 

43 

48 

41 

4E 

47 

49 


: 1068 

48 

41 

4E 

47 

49 

4E 

47 

20 


1118 

4E 

47 

20 

42 

41 

4E 

44 

2D 


: 1070 

50 

55 

4C 

53 

45 

57 

49 

44 


1120 

50 

41 

53 

53 

20 

46 

49 

4C 


: 1078 

54 

48 

00 

43 

48 

41 

4E 

47 


1128 

54 

45 

52 

00 

43 

48 

41 

4E 


139 






1130 

47 

49 

4E 

47 

20 

52 

45 

53 


1308 

85 

10 

3D 

1 1 

D4 

A9 

0 F 

85 


1138 

4F 

4E 

41 

4E 

43 

45 

00 

52 


1310 

19 

8 D 

18 

D4 

A 9 

00 

85 

1A 


1140 

49 

4E 

47 

20 

4D 

4F 

44 

55 


1318 

SD 

17 

D4 

A 9 

00 

8 D 

15 

D4 


1148 

4C 

41 

54 

49 

4F 

4E 

20 

4F 


1320 

8 D 

16 

D4 

A 9 

77 

85 

13 

SD 


1150 

4E 

00 

43 

48 

41 

4E 

47 

49 


1328 

13 

D4 

A9 

77 

85 

16 

8 D 

14 


1158 

4E 

47 

20 

4D 

4F 

44 

55 

40 


1330 

D4 

A5 

5D 

85 

04 

8 D 

12 

D4 


1160 

41 

54 

4F 

52 

00 

53 

59 

4E 


1338 

A9 

AD 

85 

2A 

A9 

11 

85 

2B 


1168 

43 

48 

52 

4F 

4E 

49 

5A 

41 


1340 

A0 

00 

B1 

2A 

85 

09 

8 D 

0E 


1170 

54 

49 

4F 

4E 

20 

4F 

4E 

00 


1348 

D4 

08 

81 

2A 

85 

0A 

8 D 

0F 


1178 

43 

48 

41 

4E 

47 

49 

4E 

47 


1350 

D4 

A5 

2A 

18 

69 

02 

85 

2A 


1180 

20 

53 

59 

4E 

43 

20 

46 

52 


1358 

A9 

00 

65 

2B 

85 

2B 

A9 

BF 


1188 

45 

51 

55 

45 

4E 

43 

49 

45 


1360 

85 

30 

A9 

11 

85 

31 

A0 

00 


1190 

53 

00 

0 C 

01 

18 

02 

30 

04 


1368 

B1 

30 

85 

ID 

A5 

30 

18 

69 


1198 

61 

08 

03 

10 

87 

21 

0F 

43 


1370 

01 

85 

30 

A9 

00 

65 

31 

85 


11 A0 

IE 

86 

00 

00 

30 

30 

30 

30 


1378 

31 

A5 

5D 

09 

01 

85 

04 

8 D 


11A8 

3C 

3C 

30 

30 

00 

00 

07 

E9 


1380 

12 

D4 

A9 

00 

85 

3B 

A5 

3B 


1180 

07 

61 

08 

8 F 

00 

30 

0B 

8 F 


1388 

F0 

FC 

06 

5D 

F0 

32 

A5 

5D 


1188 

0A 

68 

09 

61 

08 

00 

00 

0F 


1390 

09 

2 @ 

D@ 

0B 

A9 

36 

85 

22 


11 C0 

0F 

0F 

0F 

0F 

0F 

0F 

0F 

00 


1398 

A9 

10 

85 

23 

20 

09 

19 

09 


1 1C8 

01 

01 

01 

01 

01 

01 

01 

01 


13A0 

40 

D0 

0B 

A9 

48 

85 

22 

A9 


11 D0 

01 

02 

02 

02 

02 

04 

06 

09 


1 3A8 

10 

85 

23 

20 

09 

19 

09 

80 


11 D8 

01 

01 

01 

01 

01 

01 

01 

01 


1 3B0 

D0 

0B 

A9 

58 

85 

22 

A9 

10 


11 E0 

01 

02 

02 

03 

04 

0A 

10 

1A 


1 3B3 

85 

23 

20 

09 

19 

40 

31 

13 


11 ES 

0C 

01 

51 

01 

91 

01 

03 

01 


1300 

78 

A9 

40 

85 

5D 

A9 

00 

8 D 


11 F0 

18 

@2 

A3 

02 

23 

03 

86 

03 


1308 

13 

D4 

85 

13 

A9 

FF 

8 D 

14 


11F8 

30 

04 

47 

05 

47 

06 

00 

07 


13D0 

D4 

85 

16 

A9 

67 

85 

22 

A9 


1200 

61 

08 

8 F 

0A 

8 F 

00 

18 

0E 


1 3D8 

10 

85 

23 

20 

09 

19 

A9 

FD 


1208 

C3 

10 

IF 

15 

32 

19 

31 

10 


13E0 

8 D 

14 

03 

A9 

19 

8 D 

15 

03 


1210 

87 

21 

3E 

2A 

30 

32 

63 

38 

.:13E8 

58 

A9 

31 

85 

09 

A9 

10 

85 


1218 

0F 

43 

7D 

54 

79 

64 

07 

70 


13F0 

0A 

A5 

09 

8 D 

0E 

D4 

A5 

0A 


1220 

IE 

86 

FA 

A8 

F3 

08 

8 F 

El 


13F8 

8 D 

0F 

D4 

A5 

0F 

38 

E9 

03 


1223 

00 

00 

30 

30 

30 

30 

30 

30 


1400 

85 

0F 

A5 

10 

E9 

00 

85 

10 


1230 

3C 

3C 

30 

30 

30 

30 

30 

30 


1408 

A5 

0F 

8 D 

10 

D4 

A5 

10 

8 D 


1238 

3C 

30 

30 

30 

30 

30 

30 

30 


1410 

11 

D4 

A9 

00 

85 

3B 

A5 

3B 


1240 

3C' 

30 

30 

30 

30 

30 

30 

30 


1418 

F0 

FC 

A5 

0F 

05 

10 

D0 

DB 


1248 

3C 

30 

00 

78 

78 

A9 

06 

85 


1420 

A9 

00 

85 

04 

8 D 

12 

D4 

A9 


1250 

01 

A9 

00 

8 D 

0D 

DC 

8 D 

0D 


1428 

7B 

85 

22 

A9 

10 

85 

23 

20 


1258 

DD 

AD 

0D 

DC 

AD 

0D 

DD 

A9 


1430 

09 

19 

A9 

20 

85 

5D 

A9 

92 


1260 

00 

8 D 

02 

DC 

8 D 

03 

DC 

8 D 


1438 

85 

2A 

A9 

11 

85 

2B 

A9 

A4 


1268 

0E 

DC 

8 D 

0F 

DC 

8 D 

0E 

DD 


1440 

85 

30 

A9 

11 

85 

31 

A9 

31 


1270 

8 D 

0F 

DD 

A9 

01 

8 D 

1A 

D0 


1448 

8 D 

14 

03 

A9 

19 

8 D 

15 

03 


1278 

A9 

FF 

8 D 

19 

D0 

A2 

02 

A9 


1450 

A9 

20 

85 

04 

8 D 

12 

D4 

A0 


1280 

00 

95 

00 

E8 

D0 

FB 

A2 

FF 


1458 

00 

B1 

2A 

8 D 

0E 

D4 

85 

09 


1283 

9A 

A9 

03 

8 D 

18 

03 

A9 

10 


1460 

B1 

30 

85 

ID 

08 

B1 

2A 

8 D 


1290 

8 D 

19 

03 

A9 

31 

8 D 

14 

03 


1468 

0F 

D4 

85 

0A 

A5 

2A 

18 

69 


1298 

A9 

19 

8 D 

15 

03 

A9 

FB 

8 D 


1470 

02 

85 

2A 

A9 

00 

65 

2B 

85 


12A0 

12 

D0 

AD 

11 

D0 

29 

7F 

8 D 


1478 

2B 

A5 

30 

18 

69 

01 

85 

30 


1 2A8 

11 

D0 

A9 

00 

85 

20 

A9 

D8 


1480 

A9 

00 

65 

31 

85 

31 

A9 

77 


1280 

85 

21 

A0 

00 

A2 

00 

A9 

01 


1488 

8 D 

13 

D4 

85 

13 

8 D 

14 

D4 


1288 

91 

20 

08 

D0 

FB 

E6 

21 

A5 


1490 

85 

16 

A9 

21 

8 D 

12 

D4 

85 


12C0 

21 

09 

DC 

D0 

FI 

A9 

00 

85 


1498 

04 

A9 

00 

85 

3B 

A5 

3B 

F0 


12C8 

20 

A9 

04 

85 

21 

A0 

00 

A2 


14A0 

FC 

A9 

80 

85 

22 

A9 

10 

85 


12 D0 

00 

A9 

20 

91 

20 

08 

D0 

FB 


MAS 

23 

20 

09 

19 

78 

A9 

FD 

8 D 


12D8 

E6 

21 

E8 

E0 

04 

D0 

F2 

A9 


14B0 

14 

03 

A9 

19 

8 D 

15 

03 

58 


12E0 

18 

4A 

4A 

85 

45 

AD 

18 

D0 


14B8 

A9 

01 

85 

5D 

A9 

05 

85 

13 


12E8 

29 

F0 

05 

45 

8 D 

18 

D0 

58 


1400 

8 D 

13 

D4 

A9 

03 

8 D 

14 

D4 


12F0 

A9 

10 

85 

5D 

A9 

24 

85 

22 


1408 

85 

16 

A9 

A5 

85 

09 

A9 

IF 


1 2F8 

A9 

10 

85 

23 

20 

09 

19 

A9 


.14D0 

85 

0A 

A5 

09 

8 D 

0E 

D4 

A5 

.:1308 

00 

85 

0F 

8 D 

10 

D4 

A9 

08 


1 4D8 

0A 

8 D 

0F 

D4 

A9 

21 

85 

04 


140 





14E0 

8D 

12 

D4 

A5 

13 

4A 

4A 

4A 


1 6B8 

0E 

D4 

A5 

0A 

8D 

0F 

D4 

A5 

1 4E8 

4A 

AA 

6D 

C8 

11 

85 

ID 

A9 


1 6C0 

09 

05 

0A 

D0 

C4 

A9 

FA 

85 

14F0 

00 

85 

3C 

A5 

3C 

F0 

FC 

A9 


1 6C8 

22 

A9 

10 

35 

23 

20 

09 

19 

1 4F8 

20 

85 

04 

8D 

12 

D4 

A5 

13 


1 6D0 

A9 

00 

85 

09 

A9 

00 

85 

0A 

1500 

18 

69 

10 

85 

13 

8D 

13 

D4 


1 6D8 

A9 

00 

85 

07 

A9 

00 

85 

08 

1503 

29 

F0 

D0 

D0 

A9 

A1 

85 

22 


1 6E0 

A5 

09 

8D 

0E 

D4 

A5 

07 

8D 

1510 

A9 

10 

85 

23 

20 

09 

19 

A9 


1 6E8 

07 

D4 

A5 

0A 

8D 

0F 

D4 

A5 

1518 

01 

85 

5D 

A9 

50 

85 

13 

8D 


1 6F0 

OS 

8D 

08 

D4 

A9 

4F 

85 

19 

1520 

13 

D4 

A9 

03 

85 

16 

8D 

14 


1 6F8 

8D 

18 

D4 

A9 

00 

85 

3B 

A5 

1523 

D4 

A9 

C3 

85 

09 

A9 

10 

85 


1700 

3B 

F0 

FC 

A5 

09 

18 

69 

20 

1530 

0A 

A5 

09 

8D 

0E 

D4 

A5 

0A 


1708 

85 

09 

A9 

00 

65 

0A 

85 

0A 

1538 

8D 

0F 

D4 

A9 

21 

85 

04 

8D 


1710 

A5 

07 

38 

E9 

20 

85 

07 

A5 

1540 

12 

D4 

A5 

13 

29 

0F 

AA 

BD 


1718 

08 

E9 

00 

85 

08 

A5 

07 

8D 

1548 

D3 

11 

85 

ID 

A9 

00 

85 

3C 


1720 

07 

D4 

A5 

08 

8D 

08 

D4 

A5 

1550 

A5 

3C 

F0 

FC 

A9 

20 

85 

04 


1728 

09 

8D 

0E 

D4 

A5 

0A 

8D 

0F 

1558 

8D 

12 

D4 

A5 

13 

18 

69 

01 


1730 

D4 

A5 

09 

05 

0A 

D0 

C4 

A9 

1560 

85 

13 

8p 

13 

D4 

29 

0F 

D0 


1738 

12 

35 

22 

A9 

1 1 

85 

23 

20 

1568 

D2 

A9 

B5 

85 

22 

A9 

10 

85 


1740 

09 

19 

A9 

00 

85 

09 

A9 

00 

1570 

23 

20 

09 

19 

A9 

20 

8D 

13 


1748 

85 

0A 

A9 

00 

85 

09 

A9 

00 

1578 

D4 

85 

13 

A9 

00 

85 

16 

8D 


1750 

85 

0A 

A5 

09 

8D 

0E 

D4 

A5 

1580 

14 

D4 

A9 

D1 

85 

09 

A9 

12 


1758 

07 

8D 

07 

D4 

A5 

0A 

3D 

0F 

1588 

85 

0A 

A5 

09 

8D 

0E 

D4 

A5 


1760 

D4 

A5 

08 

8D 

08 

D4 

A9 

2F 

1590 

0A 

8D 

0F 

D4 

A9 

21 

85 

04 


1768 

85 

19 

8D 

18 

D4 

A9 

00 

85 

1598 

8D 

12 

D4 

A9 

01 

85 

ID 

A9 


1770 

3B 

A5 

36 

F0 

FC 

A5 

09 

18 

15A0 

00 

85 

3C 

A5 

3C 

F0 

FC 

A9 


1778 

69 

20 

85 

09 

A9 

00 

65 

0A 

15A8 

20 

85 

04 

8D 

12 

D4 

A5 

16 


1780 

85 

0A 

A5 

07 

38 

E9 

20 

85 

1560 

18 

69 

10 

85 

16 

8D 

14 

D4 


1788 

07 

A5 

08 

E9 

00 

85 

08 

A5 

1568 

29 

F0 

D0 

D8 

A9 

CC 

85 

22 


1790 

07 

8D 

07 

D4 

A5 

08 

8D' 

08 

15C0 

A9 

10 

85 

23 

20 

09 

19 

A9 


1798 

D4 

A5 

09 

8D 

0E 

D4 

A5 

0A 

15C8 

F0 

85 

16 

8D 

14 

D4 

A9 

IF 


17A0 

8D 

0F 

D4 

A5 

09 

05 

0A 

D0 

15D0 

85 

09 

A9 

15 

85 

0A 

A5 

09 


1 7A8 

C4 

85 

04 

8D 

12 

D4 

85 

03 

15D8 

8D 

0E 

D4 

A5 

0A 

8D 

0F 

D4 


1 7B0 

8D 

0B 

D4 

A9 

2C 

85 

22 

A9 

15E0 

A9 

21 

85 

04 

8D 

12 

D4 

A9 


1 7B8 

11 

85 

23 

20 

09 

19 

A9 

81 

15E8 

01 

85 

ID 

A9 

00 

85 

3C 

A5 


17C0 

85 

04 

8D 

12 

D4 

A9 

80 

8D 

s 15F0 

3C 

F0 

FC 

A9 

20 

85 

04 

8D 


1 7C8 

16 

D4 

35 

13 

A9 

32 

85 

09 

: 15F8 

12 

D4 

A5 

16 

29 

0F 

AA 

6D 


1 7D0 

A9 

19 

85 

0A 

A5 

09 

3D 

0E 

: 1600 

D8 

11 

85 

ID 

A9 

00 

85 

3C 


1 7D8 

D4 

A5 

0A 

8D 

0F 

D4 

A9 

IF 

31608 

A5 

3C 

F0 

FC 

A5 

16 

18 

69 


1 7E0 

85 

19 

8D 

13 

D4 

A9 

01 

85 

:1610 

01 

85 

16 

8D 

14 

D4 

29 

0F 


1 7E8 

ID 

A9 

00 

35 

3C 

A5 

3C 

F0 

31618 

D0 

C6 

A9 

E2 

85 

22 

A9 

10 


1 7F0 

FC 

A5 

1A 

18 

69 

10 

85 

1A 

8 1620 

85 

23 

20 

09 

19 

A9 

IF 

85 


1 7F8 

8D 

17 

D4 

29 

F0 

D0 

E6 

A9 

3 1628 

19 

8D 

18 

D4 

A9 

06 

8D 

17 


1800 

3F 

85 

22 

A9 

1 1 

85 

23 

20 

: 1630 

D4 

85 

1A 

A9 

00 

85 

09 

A9 


1808 

09 

19 

A9 

77 

85 

11 

8D 

05 

3 1638 

00 

85 

0A 

A5 

09 

8D 

0E 

D4 


1810 

D4 

85 

14 

8D 

06 

D4 

85 

13 

:1640 

A5 

0A 

8D 

0F 

D4 

A9 

00 

85 


1313 

8D 

13 

D4 

85 

16 

8D 

14 

D4 

3 1648 

07 

A9 

00 

85 

08 

A5 

07 

8D 


1820 

85 

15 

8D 

0D 

D4 

85 

12 

8D 

3 1650 

07 

D4 

A5 

08 

8D 

08 

D4 

A9 


1828 

0C 

D4 

A9 

3E 

85 

09 

A9 

01 

3 1658 

00 

85 

17 

8D 

15 

D4 

A9 

08 


1830 

85 

0A 

A5 

09 

8D 

0E 

D4 

A5 

3 1660 

85 

18 

8D 

16 

D4 

A9 

00 

85 


1833 

0A 

8D 

0F 

D4 

A5 

19 

09 

80 

3 1668 

13 

8D 

13 

D4 

8D 

0C 

D4 

85 


1840 

8D 

18 

D4 

A9 

20 

85 

04 

8D 

8 1670 

12 

A9 

F0 

85 

16 

8D 

14 

D4 


1848 

12 

D4 

A9 

14 

35 

02 

A9 

31 

3 1678 

85 

15 

8D 

0D 

D4 

A9 

21 

85 


1850 

8D 

14 

03 

A9 

19 

8D 

15 

03 

3 1680 

04 

8D 

12 

D4 

85 

03 

8D 

0B 


1853 

A9 

E8 

85 

26 

A9 

11 

85 

27 

3 1688 

D4 

A9 

00 

85 

3B 

A5 

3B 

F0 


I860 

A9 

2A 

85 

2C 

A9 

12 

85 

2D 

3 1690 

FC 

A5 

09 

18 

69 

20 

85 

09 


1368 

A0 

00 

B1 

26 

85 

05 

8D 

00 

3 1698 

A9 

00 

65 

0A 

85 

0A 

A5 

07 


1870 

D4 

B1 

2C 

85 

16 

C8 

61 

26 

3 16A0 

38 

E9 

20 

85 

07 

A5 

08 

E9 


1878 

85 

06 

8D 

01 

D4 

A5 

2C 

18 

s 1 6A3 

00 

85 

08 

A5 

07 

8D 

07 

D4 


I860 

69 

01 

85 

2C 

A9 

00 

65 

2D 

:1660 

A5 

08 

8D 

08 

D4 

A5 

09 

8D 


1888 

85 

2D 

A5 

26 

18 

69 

02 

85 







1890 

26 

A9 

00 

65 

27 

85 

27 

A9 

1978 

65 

2D 

85 

2D 

A5 

26 

18 

69 


1898 

15 

85 

02 

8D 

04 

D4 

A9 

00 

1980 

02 

85 

26 

A9 

00 

65 

27 

85 


18A0 

85 

3B 

A5 

3B 

F0 

FC 

A9 

65 

1988 

27 

A5 

02 

09 

01 

85 

02 

8D 


18A8 

85 

22 

A9 

11 

85 

23 

20 

09 

1990 

04 

D4 

A5 

ID 

F0 

4E 

C6 

ID 


18B0 

19 

A9 

22 

85 

02 

8D 

04 

D4 

1998 

D0 

4A 

A9 

10 

85 

04 

8D 

12 


18B8 

A9 

E8 

85 

26 

A9 

11 

85 

27 

19A0 

D4 

A0 

00 

B1 

2A 

D0 

07 

A9 


18C0 

A9 

2A 

85 

2C 

A9 

12 

85 

2D 

1 9A8 

01 

85 

3B 

4C 

E4 

19 

8D 

0E 


18C8 

A0 

00 

B1 

26 

85 

05 

8D 

00 

I960 

D4 

85 

09 

C8 

B1 

2A 

8D 

0F 


18D0 

D4 

B1 

2C 

85 

IB 

C8 

B1 

26 

19B8 

D4 

85 

0A 

A5 

2A 

18 

69 

02 


18D8 

85 

06 

8D 

01 

D4 

A5 

2C 

18 

19C0 

85 

2A 

A9 

00 

65 

2B 

85 

2B 


18E0 

69 

01 

85 

2C 

A9 

00 

65 

2D 

1 9C8 

A0 

00 

81 

30 

85 

ID 

A5 

30 


1 8E8 

85 

2D 

A5 

26 

18 

69 

02 

85 

19D0 

18 

69 

01 

85 

30 

A9 

00 

65 


18F0 

26 

A9 

00 

65 

27 

85 

27 

A9 

1 9D8 

31 

85 

31 

A5 

5D 

09 

01 

85 


1 8F8 

23 

85 

02 

8D 

04 

D4 

A9 

00 

19E0 

04 

8D 

12 

D4 

A9 

FB 

8D 

12 


1900 

85 

3B 

A5 

3B 

F0 

FC 

4C 

4B 

19E8 

D0 

AD 

11 

D0 

29 

7F 

8D 

11 


1908 

12 

A9 

90 

85 

24 

A9 

05 

85 

19F0 

D0 

A9 

FF 

8D 

19 

D0 

68 

A8 


1910 

25 

A0 

00 

A9 

20 

91 

24 

C8 .:19F8 

68 

AA 

68 

40 

EA 

78 

E6 

38 


1918 

C0 

28 

D0 

F9 

A9 

90 

85 

24 

1A00 

E6 

39 

A5 

39 

49 

3C 

D0 

10 


1920 

A9 

05 

85 

25 

A0 

00 

B1 

22 

1A08 

85 

39 

E6 

3A 

A5 

ID 

F0 

08 


1928 

F0 

06 

91 

24 

C8 

4C 

26 

19 

1A10 

C6 

ID 

D0 

04 

A9 

01 

85 

3C 


1930 

60 

78 

E6 

38 

E6 

39 

A5 

39 

1A18 

A9 

01 

85 

3B 

A5 

5D 

C9 

01 


1938 

49 

3C 

D0 

04 

85 

39 

E6 

3A 

1A20 

F0 

09 

A9 

40 

8D 

12 

D4 

A9 


1940 

A5 

IB 

F0 

4E 

C6 

IB 

D0 

4A 

1A28 

41 

85 

04 

A9 

FB 

8D 

12 

D0 


1948 

A5 

02 

29 

FE 

85 

02 

8D 

04 

1A30 

AD 

11 

D0 

29 

7F 

8D 

11 

D0 


1950 

D4 

A0 

00 

B1 

26 

D0 

07 

A9 

1A38 

A9 

FF 

8D 

19 

D0 

68 

A8 

68 


1958 

01 

85 

3B 

4C 

92 

19 

85 

05 . :1A40 

AA 

68 

40 

EA 

48 

49 

00 

5F 


I960 

8D 

00 

D4 

B1 

2C 

85 

IB 

C8 











1968 

B1 

26 

85 

06 

8D 

01 

D4 

A5 











1970 

2C 

18 

69 

01 

85 

2C 

A9 

00 











Listing C-7: The COMMON Source Code 


1000 

; PUT" 

30:COMMON" 

1 260 

GN1 

= 

*0 323 

1010 

5 


1270 

GSi 

= 

*0353 

1020 

;THI S 

IS COMMON—THE STANDARD 

1230 

AN 1 

= 

*0 386 

1030 

;ADDITIONS FOR COMMODORE MUSIC 

1290 

AS1 

= 

*0 3BB 

1040 

; 10/29/83 

1300 

BN1 

= 

*0 3F4 

1050 

5 NOTE 

DEFINITIONS 

1310 

CN2 

= 

*0 430 

1060 

5 


1320 

CS2 

= 

*0470 

1070 

CN0 

= *010C 

1 330 

ON 2 

=s 

*0 4B4 

1080 

CS0 

= *01 1C 

1340 

092 

= 

*04F6 

1090 

DN0 

= *01 2D 

1350 

EN2 

= 

*0547 

1100 

DS0 

= *013E 

1 360 

FN2 

= 

*0 598 

1110 

EN© 

= *0151 

1370 

FS2 

=• 

*0 5ED 

1 1 20 

FN0 

= *0166 

1380 

GN2 

= 

*0647 

1130 

FS0 

= *017B 

1390 

GS2 

= 

*06A7 

1140 

GN0 

= *0191 

1400 

AN 2 

= 

*070C 

1150 

GS0 

= *01A9 

1410 

AS2 

= 

*0 777 

11 60 

AN© 

= *01C3 

1420 

BN 2 

= 

*0 7E9 

1 170 

AS0 

= *01DD 

1430 

CN3 

= 

*0 861 

1180 

BN0 

= *01 FA 

1440 

CS3 

= 

*08E1 

1 190 

CN1 

= *0218 

1450 

DN3 

= 

*0968 

1 200 

csi 

= *0238 

1460 

DS3 

= 

*09F7 

1210 

DN1 

= *025A 

1470 

EN3 

= 

*0A8F 

1220 

OS 1 

= *0270 

1430 

FN3 

= 

*0B30 

1230 

EN 1 

= *02A3 

1490 

FS3 

= 

*0BDA 

1240 

FN1 

= *02CC 

1500 

GN3 

= 

*0C8F 

1 250 

FS1 

= *02F6 

1510 

GS3 

= 

*0D4E 
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1520 

AN 3 

= $0E13 

1 880 

AN 6 

= 

$70 C7 


1530 

AS3 

= $0EEF 

1 890 

AS6 

= 

$777C 


1540 

BN 3 

= $0FD2 

1900 

BN 6 

= 

$7E97 


1550 

CN4 

= $10C3 

1910 

CN7 

= 

$861 E 


1560 

CS4 

= $11C3 

1920 

CS7 

= 

$8E1 8 


1570 

DN4 

= $12D1 

1930 

DN7 

= 

$968B 


1 580 

DS4 

= $13EF 

1940 

DS7 

= 

$9F7E 


1 590 

EN4 

= $151F 

1950 

EN7 

= 

$A8FA 


1600 

FN4 

= $1660 

I960 

FN7 

= 

$B306 


1610 

FS4 

= $1785 

1970 

FS7 

= 

$BDAC 


1620 

GN4 

= $1932 

1980 

GN7 

= 

$C8F3 


1630 

GS4 

= $1A9C 

1990 

GS7 

= 

$D4E6 


1640 

AN 4 

= $1 C31 

2000 

AN 7 

= 

$E18F 


1 650 

AS4 

= $1 DDF 

2010 

AS7 

_ 

$EEF8 


1660 

1 670 

BN 4 

CN5 

= $1 FAS 
= $2187 

2020 

BN 7 

= 

$FD2E 


1680 

CSS 

= $2386 

2030 

5 




1 696 

DNS 

= $25A2 

20 40 

;NOTE 

TIME CHART 

1700 

DS5 

= $27DF 

2050 

5 




1710 

EN5 

= $2A3E 

2066 

WHL 

= 

$3C ; 

: WHOLE NOTE 

1 720 

FN5 

= $2CC1 

2070 

HLF 

= 

$1 E ? 

HALF NOTE 

1730 

FS5 

= $2F6B 

2080 

QRT 

= 

$0F ; 

QUARTER NOTE 

1740 

GN5 

= $323C 

2098 

TRP 

= 

$14 ; 

TRIPLET 

1750 

GS5 

= $3539 

2100 

EGT 

= 

$07 5 

EIGHTH NOTE 

1760 

AN 5 

= $3863 

2110 

SXT 

= 

$03 : 

SIXTEENTH NOTE 

1770 

ASS 

= $3BBE 

2120 

NTH 

= 

$06 5 

NINTH NOTE-1/3 

1 780 

BN 5 

= $3F4B 





TRIPLET 

1796 

CNS 

= $430F 






1800 

CS6 

= $470C 

2130 

DHF 

= 

$2D : 

DOTTED HALF 

1810 

DN6 

= $4B45 

21 40 

DQR 

=s 

$16 ; 

DOTTED QUARTER 

1820 

DS6 

= $4FBF 

2150 

DEG 

= 

$0A ; 

DOTTED EIGHTH 

1830 

EN6 

= $547D 

2160 

DSX 

= 

$04 ; 

DOTTED SIXTEENTH 

1840 

FN6 

= $5983 

2170 

5 




1 850 

FS6 

= $5ED6 

2180 

5 




1 860 

GN6 

= $6479 

2190 

5 




1870 

GS6 

= $6A73 

2200 


.END 


Listing C-8: The SNDDEF Source Code 






1000 

•PUT"30sSNDDEF" 

1200 

S1ATDC 

DS 

1 


1010 

5 


1210 

S2ATDC 

DS 

1 


1020 

SRAM DEFINITIONS 

1220 

S3ATDC 

DS 

1 


1030 



1230 

S1SURL 

DS 

1 


1040 

* 

= $02 

1240 

S28URL 

DS 

1 


1050 

S1CORG 

DS 1 

1250 

S3SURL 

DS 

1 


1060 

S2C0RG 

DS 1 

1260 

FILLO 

DS 

1 


1070 

S3C0RG 

DS 1 

1270 

FILHI 

DS 

1 


1080 

S1FRLO 

DS 1 

1 280 

MMOD 

DS 

1 


1090 

S1FRHI 

DS 1 

1 290 

RFIL 

DS 

1 


1100 

S2FRL0 

DS 1 

1 300 

SNDTM1 

DS 

1 

A 


1110 

S2FRHI 

DS 1 

1310 

SNDTM2 

DS 

1 


1 1 20 

S3FRL0 

DS 1 

1320 

SNDTM3 

DS 

1 


1130 

S3FRHI 

DS 1 

1330 

SCRPT 

DS 

2 


1140 

S1PWLQ 

DS 1 

1340 

SCRDST 

DS 

2 


1150 

S1PWHI 

DS 1 

1 350 

SRC 

DS 

2 


1160 

S2PWLG 

DS 1 

1360 

DST 

DS 

j £ 


1170 

S2PWHI 

DS 1 

1370 

NOTPT1 

DS 

2 


1180 

S3PWL0 

DS 1 

1380 

N0TPT2 

DS 

2 


1190 

S3PWHI 

DS 1 

1390 

NGTPT3 

DS 

2 
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1400 

N0TTM1 

DS 

2 

1550 

: 


1410 

NDTTM2 

DS 

2 

1 560 

BUF 

DS 8 

1420 

N0TTM3 

DS 

2 

1570 

BUF1 

DS 8 

1430 

OPTION 

DS 

1 

1580 

I BUF 

DS 8 

1440 

RAND1 

DS 

1 

1590 

MBUF 

DS 8 

1450 

RAND 2 

DS 

1 

160 0 

: 


1460 

RAND 3 

DS 

1 

1610 

WAVTYP 

DS 1 

1470 

RAND 4 

DS 

1 

1620 

: 


1480 

LEVEL 

DS 

1 

1630 

CURS 

DS 1 

1490 

} 



1 640 

NYB 

DS 1 

1500 

SCREEN 

DS 

1 

1650 

BASE 

DS 2 

1510 

RANSEC 

DS 

1 

1660 

5 


1520 

SECOND 

DS 

1 

1670 

J 


1530 

ENABLE 

DS 

1 

1 680 


. END 

1 540 

TIMQUT 

DS 

1 





Listing C-9: The DATA Source Code 


1000 

1010 

; PUT" 

30 s DATA 11 


1020 

1030 

5 PUT 

THE DATA HERE 

1040 

RET 

RTI 


1050 

1060 

5 

. BYTE 

'<C> COPYRIGHT 1984. STEVEN 

1070 

MTRI 

• BYTE 

'TRIANGLE WAVEFORM' 

1080 


. BYTE 

*00 

1090 

MSAW 

. BYTE 

' SAWTOOTH WAVEFORM*' 

1100 


.BYTE 

*00 

1110 

MSQU 

.BYTE 

'SQUARE WAVEFORM' . 

1120 


.BYTE 

*00 

1130 

MNGI 

. BYTE 

'NOISE WAVEFORM' 

1140 


.BYTE 

*00 

1150 

MCPW 

. BYTE 

'CHANGING PULSEWIDTH' 

1160 


.BYTE 

*00 

1170 

MOCT 

. BYTE 

'CHANGING OCTAVES' 

1180 


. BYTE 

*00 

1190 

MATT 

.BYTE 

'CHANGING ATTACK TIME' 

1200 


. BYTE 

*00 

1210 

MDEC 

. BYTE 

' CHANGING DECAY TIME*' 

1220 


.BYTE 

*00 

1230 

MSUS 

. BYTE 

' CHANGING SUSTAIN LEVEL-' 

1240 


. BYTE 

*00 

1250 

MREL 

.BYTE 

'’CHANGING RELEASE TIME' 

1260 


.BYTE 

*00 

1270 

MFLO 

. BYTE 

' CHANGING LO-PASS FILTER-' 

1280 


.BYTE 

*00 

1290 

MFHI 

.BYTE 

' CHANGING HI-PASS FILTER*' 

1300 


.BYTE 

*00 

1310 

MFBA 

. BYTE 

'CHANGING BAND-PASS FILTER' 

1320 


. BYTE 

*00 

1330 

MRES 

. BYTE 

'CHANGING RESONANCE' 

1340 


. BYTE 

*00 

1350 

MRMO 

.BYTE 

'RING MODULATION ON' 

1360 


.BYTE 

*00 

1370 

MRMC 

.BYTE 

'CHANGING MODULATOR' 

1380 


.BYTE 

*00 

1390 

MSYN 

.BYTE 

'SYNCHRONIZATION ON' 
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1400 .BYTE *00 

1410 MSYS .BYTE 'CHANGING SYNC FREQUENCIES' 

1420 .BYTE *00 

1430 ; 

1440 OCTAVE .WORD CN0, CN1 ,CN2,CN3,CN4,CN5,CN 6 ,CN7,*0000 
1450 ", 

1460 OCTTM .BYTE WHL,WHL,WHL,WHL,WHL,WHL,WHL,WHL,*00 

1470 ; 

1480 TUNES .WORD AN2,BN2,CN3,GN3,FN3,EN3,DNS,CN3,*0000 
1490 TUNTM .BYTE QRT,QRT,QRT,QRT,QRT,QRT,QRT,QRT,*0 0 
1500 ; 

1510 ATLK .BYTE *01,*01,*01,*01,*01,*01,*01,*01,*01,*02,*02.*02,*02,*04, 
*06,*09 

1520 DCLK .BYTE *01,*01,*01,*01,*@1,*01,*01,*01,*01,*02,*02,*03,*04,*0A, 
* 10 ,*iA 

1530 5 

1540 MODLK .WORD CN0,EN0,GN0,AN0,CN1,EN1,GN1,AN1,CN2,EN2,GN2,AN2 
1550 .WORD CN3,EN3,GN3,AN3,CN4,EN4,GN4,AN4,CN5,EN5,GN5,AN5 

1560 .WORD CN6,EN6,GN6,AN6,CN7,EN7,GN7,AN7,*0000 

1570 MODTM .BYTE WHL,WHL,WHL,WHL,WHL,WHL,WHL,WHL,WHL,WHL,WHL,WHL 
1580 .BYTE WHL,WHL,WHL,WHL,WHL,WHL,WHL,WHL,WHL,WHL,WHL,WHL 

1590 .BYTE WHL,WHL,WHL,WHL,WHL,WHL,WHL,WHL,*00 

1600 $ 

1610 .END 

Listing C-10: The EDIT SND Program, Source Code for the SOUND EDIT Program 

1000 ;PUT"30:EDIT SND" 

1010 ;LOAD"ASM ",8 
1020 5 

1030 sTHIS IS A SOUND EFFECTS DEMO 
1040 ; 

1050 <C) COPYRIGHT 1984, STEVEN BRESS 

1060 ; 

1070 5 CREATED 7/9/84 


1030 

;LATEST 

ADDITIONS 7/16/84 

1090 

• 


1100 


.OPT LIST,NOSYM,NOGEN 

1110 

: 


1120 

5 


1130 


.LIB MACLIB 

1146 


.LIB SYSDEF 

1150 


.LIB COMMON 

1160 


.LIB SNDDEF 

1176 

s 


1180 

* 

= *1000 

1190 


JMP TOP 

1200 

s 


1210 

RET 

RTI 

1226 

CURSH 

.WORD *000A,*0017,*0024,*005A,*0067,*0074,*00AA,*00B7,*00C4 

1230 


.WORD *00FA,*01071*6114.*014A,*0157,*0164,*019A,*01A7,*01B4, 

*0 1EA 

1246 


.WORD *01F7,*0204,*023A,*0247,*0254,*023A,*0297,*02A4,*0000, 
*0000 

1250 

STMR 

.WORD *03AF 

1260 

: 

.BYTE SIATDC,S2ATDC,S3ATDC,SISURL,S2SURL,S3SURL,SIFRLO,S2FRL0 

1276 

REGI 

1280 


.BYTE S3FRL0 \ SI FRHI S2FRHI ’SSFRHI , SI PWLO , S2PWL0 , S3PWL0 , SI PWHI 

1290 


.BYTE S2PWHI ’,S3PWHI ’, SI CORG , S2C0RG , S3C0RG , FI LLO , FI LHI ,MMQD 
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1300 


.BYTE RFIL.SNDTM1 

, SNDTM2 

1310 

• 



1320 

TOP 

AN OP 


1330 


KILL 


1340 


ML»COL WHITE 


1350 


LDMEM #BLUE,BORCL 


1360 


STA BCOL0 


1370 


LDMEM #$01,SPREN 


1330 


STA BPRIOR 


1390 


STA SPRCL0 


1400 


ADRES $0400.BASE 


1410 


LDMEM #$00,$DC03 


1420 


LDMEM #$FF.$DC02 


1430 


LDMEM #$7F,$DC00 


1440 

5 



1450 


MVMEM $2000,$0400 

,$04 

1460 

y 



1470 


ADRES INT0,CINU 


1430 


RAST #$FB 


1490 


CLI 


1500 

5 



1510 

START 

ANOP 


1520 


LDA CURS 


1530 


ASL A 


1540 


TAX 


1550 


LDA CURSH,X 


1560 


STA BUF 


1570 


LDA CURSH+1,X 


1530 


STA BUF+1 


1590 


LDA BUF 


1600 


ORA BUF+1 


1610 


BNE ST1 


1620 


LDMEM #$00,CURS 


1630 


JMP START 


1640 

: 



1650 

ST 1 

LDA BUF+1 


1660 


LDY NYB 


1670 


CLC 


1630 


ADC #$D8 si 

COLOR OFFSET 

1690 


STA BUF+1 


1700 

: 



1710 


LDA SCREEN 


1720 


AND #$10 


1730 


BEQ CRWT 


1740 


LDA #CYAN 


1750 


JMP PCLR1 


1760 

j 



1770 

CRWT 

LDA #WHITE 


1730 

PCLR1 

STA <BUF>.Y 


1790 

; 



1300 

! 



1310 


LDA SCREEN 


1 320 


AND #$10 


1 330 


JNE CHON2 


1840 


JSR $FFE4 


* O -J U 

1 860 


STA BUF 


1 870 


JEQ CHDN2 


i 330 


CMP #$1D 
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1890 


JEQ CRRT ;CURSORS 

1900 


CMP #*11 

1910 


JEQ CRDN 

1 920 


CMP #*91 

1 930 


JEQ CRUP 

1940 


CMP #*9D 

1950 


JEQ CRLF 

I960 


CMP #*35 :FUNCTION 1 

1970 


JEQ TRIG 

1930 


CMP #*47 :G 

1990 


JCS CHDN2 

2000 


CMP #*41 5A 

2010 


BCS CH0K3 

2020 


CMP #*3A ;:==9+1 

2030 


JCS CHDN2 

2040 


CMP #*30 ;0 

2050 


BCS CHOK1 

2060 


JMP CHDN2 

2070 

CH0K3 

ANOP 

2080 


AND #*0F 

2090 

5 


2100 

5 


2110 

5 


2120 

CH0K1 

ANOP 

2130 


STA BUF1 

2140 

; 


2150 

CH0K2 

ANOP 

2160 


LDA CURS 

2170 


ASL A 

2180 


TAX 

2190 


LDA CURSH,X 

220 0 


STA BUF 

2210 


LDA CURSH+l.X 

2220 


STA BUF+1 

2230 

: 


2240 


LDA BUF 

2250 


ORA BUF+1 

2260 


BNE PUCH 

2270 


LDMEM #*00.CURS 

2280 


JMP CH0K2 

2290 

! 


2300 

P'JCH 

LDY NYB 

2310 


DBADC BASE.BUF.BUF 

2320 


LDA BUF1 

2330 


STA (BUF),Y 

2340 


LDA BUF+i 

2350 


CLC 

2360 


ADC #*D4 : PUTS DATA AT 

2370 


STA BUF+1 

2380 


LDA ttLlHiiE 

2390 


STA (BUF),Y 

2400 


CPY #*00 

2410 


BNE NXRO 

2420 


I NY 

2430 


STY NYB 

2440 


JMP CHDN2 

2450 

; 


2460 

NXRO 

LDMEM #*00.NYB 

2470 


INC CURS 
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2480 


JMP CHDN2 

2490 

; 


2500 

CRUP 

ANOP 

2510 


LDMEM #$00.NYB 

2520 


LDA CURS 

2530 


SEC 

2540 


SBC #$03 

2550 


STA CURS 

2560 


BPL CHDN2 

2570 

; 


2580 


LDMEM #$ 1 C,CURS 

2590 


JMP CHDN2 

2600 

: 


2610 

CRDN 

ANOP 

2620 


LDMEM #$00, NYB 

2630 


LDA CURS 

2640 


CLC 

2650 


ADC #$03 

2660 


STA CURS 

2670 


CMP #$1D 

2680 


BCC CHDN2 

2690 

1 


2700 


LDMEM #$00,CURS 

2710 


JMP CHDN2 

2720 

; 


2730 

CRRT 

ANOP 

2740 


INC CURS 

2750 


LDMEM #$00,NYB 

2760 


LDA CURS 

2770 


CMP #$1D 

2780 


BCC CHDN2 

2790 

: 


2800 


LDMEM #$00.CURS 

2810 


JMP CHDN2 

2820 

; 


2830 

CRLF 

ANOP 

2840 


LDMEM #$00.NYB 

2850 


DEC CURS 

2360 


BPL CHDN2 

2870 

• 


2830 


LDMEM #$1C.CURS 

2890 

s 


2900 

CHDN2 

ANOP 

2910 

j 


2920 

: 


2930 

;CHANGE CURSOR COLOR 

2940 

; 


2950 

5 


2960 



2970 

; 


2930 

: 


2990 


LDMEM #$00.ENABLE 

30 00 

TUI ID 

LDA ENABLE 

30 1 0 


BEQ TUI ID 

30 20 


JMP START 

30 30 

: 


30 40 

: 


30 50 

I NT 0 

SEI 

30 60 


INC SCREEN 
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38 70 


INC RANSEC 

38 88 


LDA RANSEC 

3090 


EOR SC¬ 

3100 


ENE SYNC1 

31 10 

; 


3120 


STA RANSEC 

3130 


INC SECOND 

3140 

SYNC1 

ANOP 

3150 

; 


3160 


LDA SNDTM1 

3170 


ORA SNDTM1+1 

3180 


BEQ SNDDN 

3190 


DBDEC SNDTM1,1 

3200 


LDA SNDTM1 

3210 


ORA SNDTM1+1 

3220 


BNE SNDDN 

3230 

j 


3240 


LDA S1CORG 

3250 


AND #*FE 

3260 


STA S1CORG 

3270 


STA V1CQRG 

3280 

9 


3290 


LDA S2C0RG 

3300 


AND #*F£E 

3310 


STA S2C0RG 

3320 


STA V2C0RG 

3330 

1 


3340 


LDA S3C0RG 

3350 


AND #*FE 

3360 


STA S3C0RG 

3370 


STA U3C0RG 

3380 

J 


3390 

SNDDN 

ANOP 

3400 

9 


3410 


JSR *FF9F ;SCAN 

3420 

5 


3430 


LDMEM #*01,ENABLE 

3440 


RAST #*FB 

3450 


PULL 

3460 

5 


3470 

5 


3480 

5 


3490 

TRIG 

ANOP 

3500 


LDX #*00 

3510 

TRGLP 

TXA 

3520 


ASL A 

3530 


TAY 

3540 


LDA CURSH,Y 

355© 


STA BUF 

3560 


LDA CURSH+1,Y 

3570 


STA BUF+1 

3580 


DBADC BASE,BUF,BUF 

3590 


LDY #*00 

3600 


LDA < BUF),Y 

3610 


JSR ASCBIN 

3620 


NIBLL 

3630 


STA BUF1 

3640 


LDY #*01 

3650 


LDA <BUF),Y 
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3660 
3670 
3630 
3690 ; 

3700 
3710 
3720 
3730 
3740 
3750 ; 

3760 
3770 
3780 
3790 
3800 
3810 
3820 
3830 
3840 
3850 
3860 
3870 
3880 
3890 
3900 
3910 
3920 
3930 
3940 
3950 
3960 
3970 
3980 
3990 
4000 
4010 ; 

4020 
4030 ; 

4040 ; 

4050 ASCBIN ANOP 
4060 ; 


4070 

STA 

BUF1+2 



4080 

CMP 

#$07 

; IS IT A 

LETTER 

4090 

BCS 

NUM 



4100 

CLC 




4110 

ADC 

#$09 

5 DROP IT 

TO NUMBER 

4120 

RTS 




4130 ; 





4140 NUM 

AND 

#$ 0 F 



4150 

RTS 





4160 ; 

4170 5 

4180 BINASC ANOP 
4190 } 

4200 ; 

4210 ; 

4220 RTS 

4230 ; 

4240 NOP 


JSR ASCBIN 
ORA BUF1 
STA BUF1 

LDY REGI,X 
STA $00,Y 
I NX 

CPX #$1B 
BNE TRGLP 

LDMEM S1ATDC,V1ATDC 
LDMEM S2ATDC,V2ATDC 
LDMEM S3ATDC,V3ATDC 
LDMEM SISURLjVISURL 
LDMEM S2SURL ,L*2SURL 
LDMEM S3SURL,V3SURL 
LDMEM SIFRLOjVIFRLQ 
LDMEM S2FRLQ,V2FRL0 
LDMEM S3FRL0,V3FRL0 
LDMEM S1FRHI,V1FRHI 
LDMEM S2FRHI,V2FRHI 
LDMEM S3FRHI,V3FRHI 
LDMEM SlPWLO,L4PWLO 
LDMEM S2PWL0,V2PWL0 
LDMEM S3PWL0,V3PWLQ 
LDMEM S1PWHI,V1PWHI 
LDMEM S2PWHI,V2PWHI 
LDMEM S3PWHI ,L»3PWHI 
LDMEM FILLO,FLCNLO 
LDMEM FILHI,FLCNHI 
LDMEM MMOD,MODVOL 
LDMEM RFIL,RESFLT 
LDMEM SICORGCORG 
LDMEM S2C0RG,M2C0RG 
LDMEM S3C0RG,U3C0RG 

JMP CHDN2 
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4250 

4260 


NOP 

.END 


Listing C-11: The SOUND EDIT Program 
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5E 
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00 
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03 
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85 

20 

A9 

D8 


1240 

85 
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A5 

3B 

F0 

FC 

4C 

23 


10A8 

85 

21 
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00 

A2 

00 

A9 

01 


1248 

11 

78 

E6 

38 

E6 

39 

A5 

39 


10B0 

91 

20 

C8 
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FB 
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21 

A5 
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04 

85 
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21 
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06 
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01 

8D 
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38 
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01 

85 

IB 

A5 

1C 

E9 
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15 

D0 

8D 

IB 

D0 

8D 

27 

D0 


1268 

00 

85 

1C 

A5 

IB 

05 

1C 

D0 


10D0 

A9 

00 

85 

60 

A9 

04 

85 

61 


1270 

IB 

A5 

02 

29 

FE 

85 

02 

8D 


10D8 

A9 

00 

8D 

03 

DC 

A9 

FF 

3D 


1278 

04 

D4 
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03 

29 
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85 

03 
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02 
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00 
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8D 
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85 
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20 
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A9 


1288 

04 

8D 

12 
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FF 

A9 
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ID 

D0 
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IF 

12 
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00 

D4 
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07 

8D 
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A5 
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12 

0C 

3D 

24 

30 

30 

20 

20 


2248 

30 

20 

20 

20 

0D 

0F 

04 

16 

: 2078 

20 

20 

20 

20 

20 

20 

20 

20 


2250 

0F 

0C 

3D 

24 

30 

30 

20 

20 

-.2080 

20 

20 

20 

20 

20 

20 

20 

20 


2258 

20 

20 

20 

20 

20 

20 

20 

20 

: 2088 

20 

20 

20 

20 

20 

20 

20 

20 


2260 

20 

20 

20 

20 

20 

20 

20 

20 

: 2090 

20 

20 

20 

20 

20 

20 

20 

20 


2268 

20 

20 

20 

20 

20 

20 

20 

20 

: 2098 

20 

20 

20 

20 

20 

20 

20 

20 


2270 

20 

20 

20 

20 

20 

20 

20 

20 

: 20A0 

20 

20 

16 

31 

06 

12 

0C 

0F 


2278 

20 

20 

20 

20 

20 

20 

20 

20 

: 20A8 

3D 

24 

30 

30 

20 

20 

20 

16 


2280 

20 

20 

12 

05 

13 

06 

0C 

14 

: 20B0 

32 

06 

12 

0C 

0F 

3D 

24 

30 


2288 

3D 

24 

30 

30 

20 

20 

20 

13 

: 2088 

30 

20 

20 

20 

16 

33 

06 

12 


2290 

0E 

04 

14 

0D 

31 

3D 

24 

30 

: 20C0 

0C 

0F 

3D 

24 

30 

30 

20 

20 


2298 

30 

20 

13 

0E 

04 

14 

0D 

31 

s 20C8 

20 

20 

20 

20 

20 

20 

20 

20 


22A0 

2B 

31 

3D 

24 

30 

30 

20 

20 

: 20D0 

20 

20 

20 

20 

20 

20 

20 

20 


22A8 

20 

20 

20 

20 

20 

20 

20 

20 

: 20 D8 

20 

20 

20 

20 

20 

20 

20 

20 


: 22B0 

20 

20 

20 

20 

20 

20 

20 

20 

; 20E0 

20 

20 

20 

20 

20 

20 

20 

20 

. : 22B8 

20 

20 

20 

20 

20 

20 

20 

20 

: 20E8 

20 

20 

20 

20 

20 

20 

20 

20 

a 

22C0 

20 

20 

20 

20 

20 

20 

20 

20 

: 20F0 

20 

20 

16 

31 

06 

12 

08 

09 

.:22C8 

20 

20 

20 

20 

20 

20 

20 

20 

: 20F8 

3D 

24 

30 

30 

20 

28 

20 

16 


22D0 

20 

20 

20 

20 

20 

20 

20 

20 

: 21 00 

32 

06 

12 

08 

09 

3D 

24 

30 


22D8 

20 

20 

20 

20 

20 

20 

20 

20 

: 2108 

30 

20 

20 

20 

16 

33 

06 

12 


22E0 

20 

20 

20 

20 

20 

20 

20 

20 

: 21 10 

08 

09 

3D 

24 

30 

30 

20 

20 


22E8 

20 

20 

20 

20 

20 

20 

20 

20 

s 2118 

20 

20 

20 

20 

20 

20 

20 

20 


22F0 

20 

20 

20 

20 

20 

20 

20 

20 

: 21 20 

20 

20 

20 

20 

20 

20 

20 

20 


22F8 

20 

20 

20 

20 

20 

20 

20 

20 

: 21 28 

20 

20 

20 

20 

20 

20 

20 

20 


2300 

20 

20 

20 

20 

20 

20 

20 

20 

: 21 30 

20 

20 

20 

20 

20 

20 

20 

20 


2308 

20 

20 

20 

20 

20 

20 

20 

20 

: 21 38 

20 

20 

20 

20 

20 

20 

20 

20 


2310 

20 

20 

20 

20 

20 

2© 

20 

20 

-.2140 

20 

20 

16 

31 

10 

17 

0C 

0F 


2313 

20 

20 

20 

20 

20 

20 

20 

20 






2320 

20 

20 

20 

20 

20 

20 

20 

20 

23A0 

20 

20 

20 

20 

20 

20 

20 

20 

2328 

20 

20 

20 

20 

20 

20 

20 

20 

23A8 

20 

20 

20 

20 

20 

20 

20 

20 

2330 

20 

20 

20 

20 

20 

20 

20 

20 

2380 

20 

20 

20 

20 

20 

2@ 

20 

20 

2338 

20 

20 

20 

20 

20 

20 

20 

20 

2388 

20 

20 

20 

20 

20 

20 

20 

20 

2340 

20 

20 

20 

28 

20 

20 

20 

20 

23C0 

20 

20 

20 

20 

20 

20 

20 

20 

2348 

20 

20 

20 

20 

20 

20 

20 

20 

23C8 

20 

20 

20 

20 

20 

20 

20 

20 

2350 

20 

20 

20 

20 

20 

20 

20 

20 

23 D0 

20 

20 

20 

20 

20 

20 

20 

20 

2358 

20 

20 

20 

20 

20 

20 

20 

20 

23D8 

20 

20 

20 

20 

20 

20 

20 

20 

2360 

20 

20 

20 

20 

20 

20 

20 

20 

23E0 

20 

20 

20 

20 

20 

20 

20 

20 

2368 

20 

20 

20 

20 

20 

20 

20 

20 

23E8 

0 4 

F6 

00 

FI 

00 

3D 

04 

34 

2370 

20 

20 

20 

20 

20 

20 

20 

20 

23F0 

24 

24 

00 

35 

91 

7F 

94 

05 

2378 

20 

20 

20 

20 

20 

20 

20 

20 

23F8 

15 

95 

32 

0 5 

05 

80 

95 

FF 

2380 

20 

20 

20 

20 

20 

20 

20 

20 

2400 

7F 

FF 

00 

00 

FF 

FF 

00 

00 

2388 

20 

20 

20 

20 

20 

20 

20 

20 










2390 

20 

20 

20 

20 

20 

20 

20 

20 










2398 

20 

20 

20 

20 

20 

20 

20 

20 











Listing C-12: The KO-COM Program 


5 GOTO 1i0 
25 A$="R0 : “+CN*+A* 

30 OPEN 15,8,15,A$ 

40 CLOSE15 
50 END 

110 INPUT"WHAT IS THE KOALA FILE NAME";KN* 

120 INPUT"WHAT IS THE COMMODORE FILE NAME";CN$ 
130 A$=CHR$<129)+LEFT$< KN$+" ",14) 

140 CN*=CN*+"=" 

150 GOTO 25 


Listing C-13: The COM-KO Program 


5 GOTO 110 
25 A*="R0:"+A*+CN* 

30 OPEN 15.8,15,A* 

40 CL0SE15 
50 END 

110 INPUT"WHAT IS THE KOALA FILE NAME";KN* 

120 INPUT"WHAT IS THE COMMODORE FILE NAME"s CNS 
130 A*=CHR*<129>+LEFT*<KN*+" ",14> 

140 CN*="="+CN* 

150 GOTO 25 


Listing C-14: The DISPLAY PIC Program 

10 if A=0 THEN A=1 : LOAD" ML’IT" .8,1 

20 IF A=iTHEN A=2:INPUT»WHAT IS THE FILE NAME" ;QR* sLOAD QR*.0,1 
30 IF A=2THEN A=3:F0R X=1 TO 500:NEXT:SYS8192 
40 WAIT 653.1 :WAIT653,1.1 
60 STOP 


153 







Listing C-15: The MVIT Subroutine 


B* 









20 48 

FE 

A 9 

D8 

85 

FF 

A0 

00 

A2 

PC 

SR 

AC 

XR 

YR 

SP 




2050 

00 

B1 

FC 

91 

FE 

C8 

D0 

F9 

.:C03E 

32 

00 

C3 

00 

F6 




2053 

E 6 

FD 

E6 

FF 

E8 

E0 

04 

D0 

. 









20 60 

F0 

AD 

10 

87 

8D 

21 

D0 

A 9 










2068 

03 

3D 

02 

DD 

38 

E9 

01 

SD 










2070 

0 0 

DD 

A 9 

60 

4A 

4A 

8D 

0B 

.:2000 

4C 

1 3 

20 

2F 

18 

69 

3D 

49 

2073 

20 

AD 

1 3 

D0 

29 

F0 

0D 

0B 

.:2003 

3A 

32 

03 

1 3 

69 

0 7 

4C 

D0 

2080 

20 

S'D 

18 

D0 

A 9 

5C 

0A 

0A 

. :20 1 0 

27 

32 

10 

08 

48 

SA 

48 

98 

20 83 

8D 

08 

20 

AD 

1 8 

D0 

29 

0 F 

.:20i8 

48 

A 9 

40 

O cr 
=_> •_* 

FC 

A9 

7F 

85 

2090 

0D 

0B 

20 

8D 

18 

D0 

AD 

16 

.:2020 

FD 

A 9 

0 0 

35 

FE 

A 9 

5C 

85 

2098 

D0 

09 

10 

3D 

16 

D0 

AD 

1 1 

.:2028 

FF 

A0 

0 0 

A2 

0 0 

B1 

FC 

91 

20A0 

D0 

0 9 

26 

8D 

1 1 

D0 

68 

A 8 

.:2030 

FE 

C8 

D0 

F9 

E 6 

FD 

E 6 

FF 

20 AS 

68 

AA 

68 

28 

60 

63 

42 

50 

.:2038 

E8 

E0 

04 

D0 

F 0 

A 9 

28 

85 










.:2040 

FC 

A 9 

83 

85 

FD 

A 9 

00 

85 











Listing C-16: The PIC 

A CASTLE 

Koala Pad Picture File 









B* 










60E8 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

55 

PC 

SR 

AC 

XR 

YR 

SP 





60 F0 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

. 

C03E 

32 

00 

C3 

00 

F6 





60F8 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

AA 

. 










6100 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 











6108 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 











6110 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6000 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6118 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6008 

7F 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6120 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6010 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6128 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


601*8 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6130 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6020 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6138 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


60 28 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6140 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6030 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6148 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

55 


60 38 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6150 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

AA 


6040 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6153 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

55 


60 48 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6160 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6050 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6168 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6058 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6170 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

AA 


60 60 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6178 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

55 


6068 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6180 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

AA 


60 70 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6188 

55 

55 

55 

55 

55 

55 

55 

55 


6078 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6190 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

55 


60 80 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6193 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

55 


6088 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


61A0 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


60 90 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


61 AS 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

55 


6093 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


61 B0 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


60 A 0 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


61B3 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

55 


60 A 8 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

f£ 


61 C0 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


60 BS 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


61 CS 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

AA 


60 B8 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


61 D0 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


66 C0 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


6 IDS 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

55 


68 CS 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

55 


61 E0 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


60 D@ 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


61E3 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

55 


60 D8 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

55 


61 F0 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

AA 


60 E0 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 


61 FS 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

AA 


154 











6200 

FE 

FE 

FE 

FE 

FE 

FE 

FE 

AA 

63D8 

A 8 

A0 

81 

55 

55 

55 

55 

55 

620 S 

55 

55 

55 

55 

55 

55 

55 

55 

63E0 

0F 

03 

A0 

AA 

AA 

AA 

AA 

AA 

6210 

FF 

FF 

FF 

FF 

FF 

FF 

D7 

D7 

63E8 

55 

55 

15 

A5 

AB 

AE 

BA 

EA 

6218 

55 

55 

55 

55 

55 

55 

69 

69 

63F0 

FC 

FA 

EA 

AA 

AA 

AA 

AS 

A 0 

6220 

FF 

FF 

FF 

FF 

FF 

FF 

FA 

FA 

63F8 

A 8 

A3 

A0 

A2 

82 

0A 

2A 

AA 

6228 

FF 

FF 

FF 

FF 

FF 

FF 

FE 

FE 

6400 

57 

c; tr 

55 

cr cr 

55 

55 

55 

55 

6230 

FF 

FF 

FF 

FF 

FF 

FF 

BF 

BF 

6408 

AA 

AA 

6 A 

5A 

5A 

56 

55 

•-■3 

6238 

FF 

FF 

FF 

FF 

FF 

FF 

AF 

AF 

6410 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

6240 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

6418 

FF 

FF 

FF 

FC 

F0 

F2 

EA 

AA 

6248 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

6420 

FF 

CF 

0 3 

00 

50 

54 

55 

55 

6250 

55 

55 

55 

55 

55 

55 

55 

55 

6428 

55 

55 

55 

55 

15 

15 

05 

A 5 

6258 

55 

55 

55 

55 

55 

55 

55 

55 

6430 

FF 

FF 

FF 

FF 

FF. 

FF 

FF 

FF 

6 26 0 

55 

55 

55 

55 

55 

55 

55 

55 

6438 

55 

55 

55 

55 

55 

55 

54 

56 

6 2 6 8 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

6440 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

3F 

6270 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

6448 

FF 

FF 

FF 

FF 

FF 

FE 

FE 

FA 

£ 2 7 g 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

6450 

FC 

F 0 

C0 

02 

AA 

AA 

AA 

AA 

6280 

55 

55 

55 

55 

55 

crtr 

55 

55 

6458 

0F 

03 

AB 

AA 

AA 

AA 

AA 

AA 

6288 

55 

55 

55 

55 

55 

55 

55 

55 . 

6460 

FF 

FF 

FF 

FF 

FF 

7F 

5D 

59 

6290 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

6468 

55 

55 

54 

50 

40 

0F 

FF 

FF 

6298 

55 

55 

55 

55 

55 

55 

55 

55 

6470 

55 

55 

55 

15 

05 

F5 

FE 

FB 

62A0 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

3F 

6478 

55 

57 

5A 

6 A 

6 A 

AA 

AA 

AA 

62A8 

55 

55 

55 

55 

55 

55 

55 

55 

6480 

55 

55 

D5 

75 

5F 

55 

55 

55 

62B0 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FC . 

6488 

03 

A0 

AA 

AA 

AA 

56 

A9 

AA 

62B8 

55 

55 

55 

53 

50 

40 

00 

28 

6490 

FF 

FF 

BF 

AF 

AB 

AA 

6 A 

9A 

62C0 

55 

55 

55 

55 

95 

15 

F5 

FD 

6498 

3B 

CE 

3B 

CE 

3B 

CE 

3B 

CE 

62C8 

55 

55 

55 

55 

55 

55 

55 

55 

64A0 

66 

99 

66 

AA 

6 A 

AA 

6 A 

AA 

62D0 

55 

55 

55 

55 

55 

55 

55 

55 

64A8 

BB 

EF 

BB 

EF 

FB 

ED 

FB 

ED 

6 2D 8 

55 

55 

55 

55 

55 

55 

55 

55 

64B0 

DD 

77 

DD 

77 

DD 

77 

DD 

77 

62E0 

AA 

AA 

AA 

AA 

AA 

AA 

AA 

AA ■ 

64B8 

AA 

AA 

AA 

AA 

A 8 

80 

95 

55 

62E8 

AA 

AA 

AA 

AA 

AA 

AA 

AA 

AA ■ 

64C0 

FC 

F0 

C0 

00 

02 

2A 

AA 

AA 

62F0 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

64C8 

0F 

03 

00 

A 8 

AA 

AA 

AA 

AA 

62F3 

AA 

AA 

AA 

AA 

AA 

AA 

AA 

AA 

64D0 

AA 

AA 

AA 

2A 

FE 

FF 

FF 

FF 

6300 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

64D8 

54 

54 

50 

50 

43 

BF 

BF 

BF 

6308 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

64E0 

00 

00 

00 

00 

80 

A2 

AA 

AA 

6310 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

64E8 

3F 

0F 

0F 

00 

A8 

AA 

AA 

AA 

6318 

55 

55 

55 

55 

55 

55 

D5 

35 

64F0 

FF 

FF 

FF 

FF 

3F 

BF 

BF 

AF 

6320 

AA 

AA 

AA 

AA 

AA 

AA 

AA 

AA 

64F8 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

6328 

55 

55 

55 

55 

55 

55 

55 

55 

6500 

AF 

AF 

A9 

A9 

AA 

AA 

55 

55 

6330 

55 

55 

55 

55 

55 

55 

55 

55 

6508 

FE 

FA 

AA 

AA 

6A 

9A 

55 

55 

6338 

55 

55 

55 

55 

55 

55 

55 

55 

6510 

55 

55 

55 

55 

55 

55 

AA 

AA 

6340 

55 

55 

55 

55 

55 

51 

50 

7C 

6518 

AA 

AA 

AA 

AA 

AA 

AA 

FF 

FF 

6348 

AA 

AA 

AA 
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F9 

F9 

F9 

F9 

F5 

F5 

F5 


8450 

0 B 

4B 

F5 

95 

B 0 

F5 

95 

65 


8623 

F5 

45 

FB 

F5 

F5 

F9 

F9 

09 


8458 

F0 

20 

8 E 

3F 

FE 

A 0 

2F 

E 0 


8630 

FB 

FB 

FB 

FB 

A 9 

B9 

FB 

AB 


8460 

F0 

6 B 

FB 

2B 

FB 

FB 

4B 

1 C 


3638 

FE 

AE 

FE 

0E 

0E 

E0 

4E 

20 


8468 

F9 

19 

0E 

05 

F5 

45 

95 

E 0 


8640 

F0 

6 C 

8 F 

D0 

FF 

0C 

6 B 

FB 


8470 

4E 

25 

F5 

15 

05 

05 

F0 

55 


8648 

09 

F9 

9B 

F9 

49 

E5 

35 

F5 


3478 

25 

F0 

40 

F 0 

FE 

05 

45 

F5 


8650 

89 

C5 

F9 

D5 

DB 

F5 

59 

09 


8480 

FE 

FE 

FE 

FF 

F 0 

FF 

FB 

FB 


8658 

59 

FB 

AB 

FB 

IB 

FB 

89 

A9 


3433 

5B 

FB 

FB 

FC 

FC 

FC 

A0 

FC 


3660 

4B 

20 

8 E 

FE 

FE 

0E 

90 

A© 


3490 

F9 

F9 

49 

F9 

FE 

F9 

F5 

F5 


3668 

FF 

AC 

DC 

E0 

BF 

A0 

FB 

9B 


8498 

85 

F5 

F5 

F5 

FE 

F0 

F0 

F0 


8670 

A9 

B9 

FB 

29 

85 

F5 

85 

A5 


84A0 

F0 

F5 

95 

F5 

F5 

F0 

EE 

F0 


3678 

A 9 

F5 

D5 

35 

F5 

F5 

A 9 

89 


84A3 

FE 

FE 

FE 

F0 

FC 

F0 

FC 

FF 


8680 

F5 

89 

09 

89 

5B 

A9 

D5 

F9 


84B0 

FF 

FC 

FC 

0F 

FC 

F0 

F0 

FC 


8683 

79 

AB 

FE 

FE 

AE 

AE 

40 

F5 


84B8 

F5 

F5 

45 

F5 

F5 

D5 

45 

F9 


8690 

40 

F0 

0C 

BF 

4F 

FC 

FB 

9B 


84C0 

F0 

F0 

FE 

F5 

F5 

F5 

F5 

F5 


3693 

DE 

EE 

6 E 

05 

F5 

A5 

05 

D5 


34C3 

5E 

F0 

FE 

F0 

FE 

F0 

45 

F0 


86A0 

F5 

B5 

15 

F5 

05 

B5 

2E 

FE 


84D0 

FE 

FE 

4E 

F0 

F0 

F0 

FC 

F0 


86 A 8 

05 

AE 

FE 

DE 

3E 

4E 

FE 

0E 


84D8 

4B 

F0 

FB 

F0 

FC 

F0 

FC 

F0 


86 B 0 

9E 

A0 

50 

10 

9E 

FE 

4E 

0E 


84E0 

F5 

F5 

C5 

F5 

F9 

F9 

EE 

F9 


36B3 

E0 

F5 

35 

CC 

4F 

F0 

IB 

FB 


84E8 

FE 

FE 

FE 

FE 

F5 

FE 

F5 

F5 


86C0 

6D 

0D 

EE 

FD 

DD 

A9 

FD 

ED 


84F0 

FE 

F5 

FE 

EE 

FE 

FE 

F5 

FE 


86C8 

9D 

CD 

FD 

2E 

2D 

65 

FD 

CD 
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.:86D0 3D FD CD 0D AE FD 8 D AD 

.: 86 D 8 FD 85 D0 40 AE 2E AE 4E 

. : 36E0 5E 20 B0 F0 EF 20 90 F0 

.: 86 E 8 A5 D5 4E 25 FE F5 0E FE 

.:86F0 4D F5 AE DE F5 D5 A5 F5 

Listing C-17: The SPRITE MAKER Program 

1 REM SAVE"30sMAKE SPRITE”,8 
5 P=0:BASE=23552:C0=1:CL=0:CK=0 
10 REM CLIMB SCREEN MAKER 
20 POKE 53269.3 

25 IF PEEK(32760>=1THEN G0T043 
30 IF A=0 THEN A=1 : LOAD ”SLI 6.0" .3. 

40 IF A=1 THEN A=2:LGAD "CLSP2".8,1 
43 INPUT"WHAT IS THE FILE NAME":Ni 
50 POKE 56578.PEEK< 56573 >0R3:REM BANK! 

52 FOR X=0TO7 s POKE 24576+X . 0 : POKE 24576+ 8+X . 2U5 :N»ExT 
60 POKE 56576.<PEEKX 56576)AND 252>0R 2 
70 POKE 53272.120 

80 POKE 53287.7 SPOKE 53288.7 

81 POKE 53275.0 

85 SX=24s SY=50sOX=Q:OY=0 

90 POKE 53248.24sPOKE 53249.50 

91 BC=6:POKE 53280.BC;P0KE53231.BC 

92 POKE 53250.255:POKE 53251.50 

95 IF PEEK<32768)=1 THEN GOTO 132 

96 IF Q=2 THEN GOTO 121 
100 SYS 32768+3 

110 SY S 32768+6 
121 POKE 32760.1 

130 FOR X=1 TO 8:POKE 23552+X+1015.6sNEXTX 

131 POKE 24568.1 

132 POKE 53287.0 
140 REM LOOP 

150 J1=PEEK<56320)sJ1=255-Ji 
160 J2=PEEK<56321)s J2=255-J2 
170 Ji AND 16 
180 IF F = 0 THEN GET A* 

190 IF A*=” C ??:;•” THEN P=ABS<i-P) 

200 IF A$=" -C ?? > " THEN P=P 

201 IF A*=” C??>"THEN CK=PEEK<53235) s CK=< CK+1 ) AND15:POKE 53285 . CK 

202 IF A*=" C ??>"THEN CO= <<CO+1)AND15> :POKE 53288.CO 

203 IF A$ = 11 £ ?? > " THEN BC= < < BC+ 1 > AND i 5 > 

204 IF A*= n C??>"THEN CL=PEEK<53286):CL=<CL+1>AND15:POKE 53286.CL 

205 IF A'£= " i ? ? > " THEN R0KE53276.2 

206 IF A$=" i ??>"THEN POKE53276.0 


207 

IF A*= 

= ”S" 

THEN GOSUB200 0 

20 8 

IF A*= 

s H |^ !! 

THEN GOSUB3000 

209 

IF A*= 

= n C" 

THEN GOSUB4000 

219 

220 

A*=" " 

I c < J1 

AND 

i)= 1 THEN OY=OY-1 

230 

IF< JI 

AND 

2)= 2 THEN OY=0Y+1 

240 

I F < J1 

AND 

4)= 4 THEN OX=OX-i 

250 

IF< Ji 

AND 

8>= 8 THEN GX=GX+i 

270 

IF OX 

<0 THEN 0X=23 


280 IF OX>23 THEN OX=0 
290 IF OY<3 THEN 0Y=24 
300 IF OY>23 THEN 0Y=3 


.s 86F8 F5 15 A5 C5 F5 BD AE F5 
.:8700 05 35 2E F5 F5 FE FE AE 
.;870S AE 40 E5 8C AF 4E 2C IB 
.s 8710 01 00 FF FF 00 00 FF FF 
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301 SX=24+<3*OX>:SY=58+ <8*0Y> 

302 IF SX<256 THEN POKE 53264.0 

303 IF SX>255 THEN SX=SX-256sPOKE 53264.3 
310 POKE 53248,SXSPOKE 53249,SY 

320 IF C=0THEN C=1sPOKE 53237.1 
330 IF OiTHEN C=0 :POKE 53237.0 
340 POKE BASE.P 

350 POKE 53280,BC:POKE 53281.BC 

35? IF F=16 THEN POKE BASE+ < 0Y*40> + OX,P:POKE 55296+<GY*40)+ OX.1 
360 SYS3276S 
490 GOTO 140 

50 0 REM THIS IS 50 0—SAVE THE SCREEN + COLOR 
2000 REM WRITE FILE SUBROUTINE 
20 10 OPEN 8,3.3, "M ; »+N*+" .SP.S,W“ 

2020 FOR X=0 TO 1000 

2030 PRINT#8.CHR*<PEEK<23552+X>>: 

2040 NEX T X 
2050 CLOSE 8 
2900 RETURN 

3000 REM READ FILE SUBROUTINE 
3010 OPEN 8.8.8.N*+".SP.S.R" 

3020 FOR X=0 TO 1000 
30 30 GET#8 . DBS- 

30 35 IF DB$="" THEN DB*=CHR*<0> 

30 36 POKE 23552+X . ASC < DB'fc > 

3048 NEXT X 

3050 CLOSE 8 

3900 RETURN 

4000 REM CLEAR SCREEN 

4010 SYS32768+3 

4020 3YS32768+6 

4030 RETURN 

5000 REM BANK© 

5060 POKE 56578,PEEK<56578)0R3 

5070 POKE 56576.(PEEK< 56576)AND 252)0R3 

5080 POKE 53272,20 

5200 RETURN 

5500 REM BANK1 

5560 POKE 56578. PEEK*: 56578) 0R3 
5570 POKE 56576,<PEEK<56576)AND 252)0R2 
5580 POKE 53272.120 
5600 RETURN 

6000 REM WORK ON NEW SPRITE 
6010 GGSUB 5000 

6020 INPUT "WHICH SPRITE DO YOU WANT TO WORK ON"5 SP 
6030 GOSUB5500 
6040 SYS 32768+3 
6900 RETURN 


Listing C-18: The SLIB.0 File 


B* 

PC SR AC XR YR SP 
.:C03E 32 0 0 C3 00 F6 


.:8000 4C 2A 80 4C 92 80 4C AE 


: 8008 30 40 01 02 04 08 10 20 
:8010 40 80 FE FD FB F7 EF DF 
:8©18 BF 7F FE FD FB F7 EF DF 
: 8020 BF 7F 80 40 20 10 08 04 
58028 02 01 43 93 48 8A 48 A9 
: 8039 00 AA A? 78 85 FB A? 5C 
: 3038 35 FC A? 00 85 FD 85 FE 
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.*.30 46 AS 

8D 

FE 

7F 

8D 

FF 

7F 

48 


80 90 

68 

60 

A 9 

00 

o=: 
•_>, 

FD 

A9 

D8 

.:8043 B1 

FB 

F0 

0 5 

6 8 

ID 

22 

80 


80 98 

85 

FE 

A0 

0 0 

A2 

00 

A 9 

01 

.:8650 48 

E3 

C3 

E8 

U 8 

D0 

FI 

A 6 


80 A0 

91 

FD 

C8 

D0 

FB 

E6 

FE 

A5 

,;3958 FE 

68 

?D 

00 

40 

E6 

FE 

A 2 


80 AS 

FE 

C9 

DC 

D0 

FI 

60 

A 9 

00 

.58060 00 

8 A 

48 

EE 

FE 

7F 

AD 

FE 


80 B0 

85 

FD 

A 9 

SC- 

85 

FE 

A0 

00 

. ?3063 7F 

C y 

0 3 

D0 

DB 

EE 

FF 

7F 


o y B 8 

A2 

00 

A 9 

00 

91 

FD 

C3 

D0 

• ; 8 0 70 A ? 

0 0 

8 D 

FE 

7F 

A 5 

FB 

18 


80 C 0 

FB 

E6 

FE 

E8 

E8 

0 4 

D0 

F2 

.;8078 69 

23 

85 

FB 

A 9 

00 

65 

FC 


80 C 8 

60 

FF 

FF 

FF 

FF 

FF 

02 

FF 

. 5 80 80 85 

FC 

A 8 

0 0 

AD 

FF 

7F 

C9 











.58088 i5 

D0 

BD 

68 

68 

AA 

68 

A8 











Listing C-19: The CLSP2 

File 














B* 









40 70 

0 0 

00 

00 

00 

0 0 

00 

00 

00 

PC SR 

AC 

XR 

YR 

SP 





4078 

00 

00 

00 

0 0 

00 

00 

00 

00 

.sC03E 32 

00 

C3 

00 

F6 





40 80 

FF 

FF 

00 

0 0 

FF 

BF 

00 

00 

9 









40 38 

FF 

FF 

00 

00 

FF 

FF 

00 

0 0 










40 90 

FF 

FF 

00 

00 

FF 

FF 

00 

00 










4098 

FF 

FF 

0 0 

00 

FF 

FF 

00 

00 

,5 40 0 0 FF 

00 

00 

FF 

00 

08 

FF 

0 0 


40A0 

FF 

FF 

00 

00 

FF 

BF 

00 

00 

. 5 400 8 00 

FF 

00 

00 

FF 

00 

00 

FF 


40A3 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

.54010 00 

0 0 

FF 

00 

00 

FF 

00 

00 


40B0 

FF 

FF 

0 0 

00 

FF 

FF 

00 

00 

.54018 00 

0 0 

00 

00 

00 

00 

00 

00 


40 B8 

FF 

FF 

00 

0 0 

FF 

FF 

00 

0 0 

.54020 00 

00 

0 0 

0 0 

00 

00 

00 

00 


40 C0 

FF 

FF 

00 

00 

FF 

BF 

00 

00 

. 5 4028 0 0 

00 

00 

00 

00 

00 

00 

00 


40 C8 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

. 5 40 30 00 

00 

00 

00 

00 

00 

00 

00 


40 D0 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

.:4038 00 

00 

00 

0 0 

0 0 

00 

00 

00 


40 D8 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

.54040 FF 

0 0 

0 0 

FF 

0 0 

00 

FF 

00 


40 E0 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

.54048 00 

FF 

00 

0 0 

FF 

00 

00 

FF 


40 E8 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

.54050 00 

0 0 

FF 

00 

00 

FF 

00 

00 


40 F0 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

.54058 00 

0 0 

00 

00 

0 0 

00 

00 

00 


40F3 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

.54060 00 

0 0 

00 

00 

00 

00 

00 

00 


4100 

00 

00 

FF 

FF 

00 

00 

FF 

FF 

.54068 00 

00 

00 

00 

00 

08 

00 

00 












Listing C-20: The SCREEN-MAKE Program 


1 REM SAVE"30:MAKE SCREEN",8 
5 P=0:BASE=23552:C0=1 
10 REM CLIMB SCREEN MAKER 
20 POKE 53269.3 

25 IF PEEK<32760)=1THEN G0T041 

30 IF A=0 THEN A=1:LQAD “CLBACK1",8.1 

40 IF A=1 THEN A=2:L0AD "CLSP1“,8,1 

41 IF A=2 THEN A=3:L0AD "SLIB.0“,8,1 
43 INPUT"WHAT IS THE FILE NAME";NS 

50 POKE 56578,PEEK<56578)0R3:REM BANK1 

60 POKE 56576,<PEEK<56576)AND 252)OR 2 

70 POKE 53272.120 

30 POKE 53287.7:POKE 53288,7 

81 POKE 53275,3 

85 SX=24:SY=50:OX=0:OY=0 

90 POKE 53248.24:POKE 53249,50 

91 BC=6:POKE 53280,BC:P0KE53281.BC 

?5 REM IF PEEKC32760>=1 THEN GOTO i32 
96 REM IF Q=2 THEN GOTO 121 
1 0 0 3Y S 32 7 68 + 3 : S'Y S 32768+ 6 











121 POKE 32760,1 

130 FOR X=i TO 8: POKE 23352 X r t Pi 1 5.0 sNExTX 
132 POKE 53237.0 
140 REM LOOP 

150 J1=PEEK<56320)sJ1=255-J1 
160 J2=PEEK<56321):J2=255-J2 
170 F= J1 AND 16 
180 IF F = 0 THEN GET A* 

190 IF A$=" <??} "THEN F-F'+l 
280 IF A$="{??}"THEN P=P-1 

201 IF A*=" i ??}"THEN GOTO 500 

202 IF Afc=" { ?? > “THEN CO= C < CO+ 1 > AND 1 5 > 

20 3 IF A*="<??>“THEN BC= < < BC+1)AND15 > 

204 IF A$="S“THEN GOSUB 1000 

20 5 IF P<0 THEN F-0 

206 IF A$="L"THEN GOSUB 2000 

207 IF A*=“0“ THEN GOSUB3000 
210 Afc=”" 

220 I F ( J1 AND 1)= 1 THEN 0Y=0Y-1 

230 I F J1 AND 2 > = 2 THEN OY~GY+i 

240 IFCJl AND 4 >= 4 THEN 0X=0X-1 

250 I F < J1 AND 8 > = 3 THEN QX=OX+ 1 

260 IF F=16 THEN POKE BASE+<OY#40>+0X.PsPOKE 55296+<OY*40>+0X,CO 
270 IF OX<0 THEN 0X=39 
280 IF OX>39 THEN OX=0 
290 IF OY<0 THEN 0Y=24 

300 IF OY>24 THEN OY=0 

301 SX=24+ 3*OX) sSY=50+<8*OY> 

302 IF SXC256 THEN POKE 53264.0 

303 IF SX>255 THEN SX=SX-256sPOKE 53264.3 
310 POKE 53248.SX:POKE 53249,SY 

320 IF O0THEN C-l sPOKE 53287.1 
330 IF C=1THEN C=0:POKE 53237,0 
340 POKE BASE,PsPOKE 55296,00 
350 POKE 53230,BCsPOKE 53281,BC 
490 GOTO 140 

500 REM THIS IS 500—SAVE THE SCREEN + COLOR 

510 REM SYS23672 

1000 REM SAVE FILE 

1010 OPEN 8,8,8,"30 s"+N$+".BC.S.W" 

1020 FOR X=0 TO 1000 

1030 PRINT#8.CHR*<PEEK<23552+X> >;CHR*<PFEK<55296+X)); 

1040 NEXT X 

1050 CLOSE 8 

1900 RETURN 

2000 REM LOAD FILE 

2010 OPEN 8,8,8,N$+".BC,S,R" 

2020 FOR X=0 TO 1000 
2030 GET#8,DB$,DC$ 

2035 IF DB*=""THENDB*=CHR*<0> 

2036 IF DC*=""THENDC*=CHR*<0> 

2040 POKE 23552+X,ASC(DB*>sP0KE55296+X.ASC<DC*) 

2050 NEXTX 

2060 CL0SE8 

2900 RETURN 

3000 REM CLEAR SCREEN 

3010 SYS32768+3 

3020 SYS32768+6 

3030 RETURN 
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Listing C-21: The CLBACK1 File 


B* 










6698 

06 

0 C 

18 

30 

C0 

FF 

00 

0 0 

PC 

SR 

AC 

XR 

YR 

SP 





60 A 0 

60 

30 

18 

0C 

0 3 

FF 

00 

0 0 

.:C03E 

32 

00 

C3 

00 

F6 





60 A 8 

0 0 

0 0 

0 0 

00 

00 

00 

C0 

C0 

. 










60 B0 

00 

00 

0 0 

00 

C0 

C0 

C0 

C0 











60 B8 

0 0 

0 0 

C0 

C0 

C0 

C0 

C0 

C0 











60 C0 

C0 

C0 

C0 

C0 

C0 

C0 

C0 

C0 


6000 

00 

00 

00 

00 

00 

00 

00 

00 


60 C8 

0 0 

0 0 

00 

00 

00 

00 

00 

00 


6008 

FF 

0 3 

0 6 

0C 

18 

30 

60 

FF 


60 D0 

0 0 

00 

18 

66 

C3 

C3 

66 

18 


6010 

FF 

C0 

60 

30 

18 

0C 

03 

FF 


60 D8 

1 0 

20 

40 

30 

58 

24 

08 

10 


6018 

C0 

C0 

FF 

C0 

C0 

C0 

FF 

C0 


6 0 E 0 

20 

40 

30 

C0 

02 

01 

0 2 

0C 


6020 

03 

03 

FF 

03 

03 

03 

FF 

03 


60 E8 

10 

20 

30 

08 

18 

18 

66 

C3 


6028 

FF 

03 

06 

0C 

18 

30 

C0 

FF 


60 F0 

07 

0 1 

00 

00 

00 

00 

00 

00 


60 30 

FF 

C0 

60 

30 

18 

0C 

03 

FF 


60F8 

3F 

0F 

00 

00 

0 0 

00 

00 

00 


6038 

00 

00 

00 

00 

00 

00 

00 

00 


6100 

FF 

IF 

03 

00 

00 

00 

00 

00 


60 40 

00 

00 

00 

00 

00 

00 

00 

00 


61 0 8 

FF 

FF 

FF 

00 ' 

00 

00 

00 

00 


6048 

00 

00 

FF 

03 

06 

0C 

18 

30 


6110 

FF 

FF 

FS 

E0 

C0 

00 

00 

00 


6050 

00 

00 

FF 

C0 

60 

30 

18 

0C 


6118 

FF 

81 

00 

00 

00 

00 

00 

00 


6058 

C0 

FF 

00 

00 

00 

00 

00 

0 0 


6120 

FF 

FF 

IF 

07 

03 

00 

00 

00 


60 60 

03 

FF 

00 

00 

00 

00 

00 

00 


6128 

00 

00 

00 

00 

00 

00 

00 

00 


6 0 6 8 

0 0 

0 0 

0 0 

0 0 

FF 

03 

06 

0C 


6130 

00 

BA 

22 

FF 

00 

FF 

00 

62 


60 70 

0-0 

00 

00 

00 

FF 

C0 

60 

30 


6138 

00 

B3 

22 

FF 

00 

FF 

BA 

FF 


60 73 

i 8 

30 

C0 

FF 

00 

00 

00 

00 


6140 

00 

00 

FF 

FF 

00 

00 

FF 

FF 


60 80 

18 

0C 

03 

FF 

00 

00 

00 

00 












6688 

0 0 

00 

00 

00 

00 

00 

FF 

03 












6090 

0 0 

00 

00 

00 

00 

00 

FF 

C0 












Listing C-22: The CLSP1 

File 














B* 










: 40 78 

FF 

FF 

0 0 

0 0 

FF 

FF 

00 

00 

PC 

SR 

AC 

XR 

YR 

SP 





: 4080 

FF 

FF 

00 

00 

FF 

BF 

00 

00 

.:C03E 

32 

00 

C3 

00 

F6 





: 40 88 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

. 










: 40 90 

FF 

FF 

00 

00 

FF 

FF 

00 

00 











: 40 98 

FF 

FF 

00 

00 

FF 

FF 

00 

00 











; 40A0 

FF 

FF 

@0 

00 

FF 

BF 

00 

00 

.:4000 

FF 

00 

00 

FF 

00 

00 

FF 

00 


: 40A8 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

.:4008 

00 

FF 

00 

00 

FF 

00 

00 

FF 


: 40 B0 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

. : 40 1 0 

00 

00 

FF 

00 

00 

FF 

00 

00 


: 40 B8 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

.:4013 

00 

00 

00 

00 

00 

00 

00 

00 


: 40 C0 

FF 

FF 

00 

00 

FF 

BF 

00 

00 

.:4020 

00 

00 

00 

00 

00 

00 

00 

00 


: 40 C3 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

.:4028 

00 

00 

00 

00 

00 

00 

00 

00 


: 40 D0 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

. !40 30 

00 

00 

00 

00 

0 0 

00 

00 

00 


s 40B3 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

.:4038 

00 

00 

00 

00 

00 

00 

00 

00 


: 40E0 

FF 

FF 

00 

0 0 

FF 

FF 

00 

00 

.:4040 

00 

FF 

00 

FF 

00 

FF 

22 

FF 


s 40E8 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

. : 4048 

05 

FF 

00 

FF 

3F 

FF 

00 

FF 


: 40F0 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

. :4050 

FF 

FF 

00 

00 

FF 

FF 

00 

00 


: 4 0 F 8 

FF 

FF 

00 

00 

FF 

FF 

00 

00 

. : 4058 

FF 

FF 

0 0 

00 

FF 

FF 

00 

00 


: 41 00 

00 

00 

FF 

FF 

00 

00 

FF 

FF 

. :40 60 

FF 

FF 

0 0 

00 

FF 

FF 

00 

00 











. ! 4068 

FF 

FF 

00 

00 

FF 

FF 

00 

00 











. ;40 70 

FF 

FF 

0 0 

00 

FF 

FF 

00 

00 











Listing C-23: The PHOENIX VI .4N Program 











. :1<&00 

01 

01 

®1 

©1 

01 

01 

01 

01 

. 

S 1010 

01 

01 

01 

01 

01 

01 

01 

01 

.:1008 

01 

01 

01 

01 

01 

01 

01 

01 

• 

: 1018 

01 

01 

01 

01 

01 

01 

01 

01 


169 









1020 

01 

01 

01 

01 

01 

01 

01 

01 

1028 

00 

00 

00 

00 

00 

00 

00 

00 

1030 

00 

03 

00 

00 

00 

00 

00 

01 

1038 

00 

00 

00 

00 

03 

03 

00 

03 

1040 

00 

08 

00 

00 

00 

00 

00 

00 

1048 

00 

00 

00 

03 

00 

00 

00 

07 

1050 

00 

00 

00 

00 

00 

00 

01 

00 

1058 

00 

00 

01 

01 

01 

01 

01 

01 

1060 

01 

01 

01 

0D 

01 

01 

01 

01 

1066 

01 

01 

01 

01 

00 

00 

00 

00 

1070 

00 

00 

00 

00 

00 

00 

00 

00 

1078 

00 

00 

00 

00 

03 

00 

07 

01 

1080 

01 

01 

01 

01 

03 

03 

03 

03 

1088 

03 

03 

03 

03 

03 

03 

03 

©3 

1030 

03 

03 

01 

01 

01 

01 

01 

00 

1098 

00 

00 

00 

00 

00 

00 

00 

00 

1000 

01 

01 

01 

01 

01 

01 

01 

01 

1008 

03 

03 

03 

03 

03 

00 

01 

00 

10B0 

00 

00 

00 

00 

00 

00 

00 

00 

10BS 

00 

03 

03 

©3 

03 

03 

01 

01 

10C0 

01 

01 

00 

00 

00 

00 

00 

00 

10C8 

00 

00 

01 

01 

01 

01 

03 

©3 

10D0 

03 

00 

00 

00 

00 

00 

00 

00 

10D8 

00 

00 

00 

00 

00 

0D 

00 

00 

10E0 

00 

00 

00 

00 

00 

03 

03 

03 

10E8 

01 

01 

01 

01 

00 

00 

03 

08 

10F0 

09 

09 

01 

01 

03 

03 

01 

01 

10F8 

00 

00 

00 

00 

00 

00 

00 

00 

1 100 

00 

00 

07 

00 

00 

00 

00 

03 

1108 

00 

01 

00 

00 

00 

00 

00 

00 

1110 

03 

0D 

01 

01 

01 

01 

00 

01 

1118 

08 

09 

09 

03 

0F 

03 

0C 

03 

1120 

0F 

©2 

0F 

03 

0F 

00 

0F 

00 

1128 

0F 

02 

0F 

00 

©B 

00 

07 

©F 

1130 

0F 

03 

0F 

00 

0F 

00 

0F 

00 

1138 

0B 

00 

03 

©D 

01 

09 

©9 

©9 

1140 

08 

09 

08 

09 

09 

09 

©9 

0F 

1148 

0F 

00 

0F 

©3 

©F 

00 

0F 

©3 

1150 

0F 

00 

0F 

00 

0F 

00 

01 

00 

1158 

0F 

00 

0B 

©F 

©F 

00 

0B 

©9 

1160 

09 

09 

09 

09 

09 

08 

07 

08 

1168 

08 

08 

©8 

08 

08 

08 

08 

©F 

1170 

0F 

00 

00 

00 

©F 

00 

0F 

00 

1178 

0F 

00 

04 

00 

©3 

00 

07 

00 

1180 

00 

05 

09 

©D 

08 

0F 

09 

09 

i 188 

07 

07 

07 

09 

09 

®8 

08 

08 

1190 

08 

08 

08 

08 

08 

©8 

09 

09 

1198 

08 

0F 

00 

©B 

00 

0F 

0B 

0F 

1100 

08 

0F 

00 

©F 

00 

0F 

00 

0F 

1108 

00 

0F 

00 

©F 

0F 

©9 

09 

©8 

11B0 

09 

07 

07 

09 

09 

08 

©8 

08 

11B8 

08 

08 

08 

®8 

08 

09 

08 

08 

1 1C0 

09 

09 

00 

0F 

00 

0F 

0© 

0F 

11C8 

08 

0F 

0® 

0F 

®8 

0F 

09 

09 

11D0 

03 

09 

09 

©9 

09 

©9 

08 

08 

1 IDS 

08 

09 

®8 

08 

08 

09 

©9 

07 

11E0 

09 

08 

08 

09 

09 

09 

09 

08 

11E8 

09 

08 

®9 

©F 

0® 

©F 

03 

0C 

11F0 

00 

0F 

0F 

0F 

00 

09 

09 

09 



: 11F8 

07 

08 

09 

09 

09 

08 

08 

09 


3 1200 

08 

©8 

08 

08 

09 

©7 

09 

08 


: 1208 

09 

08 

08 

08 

08 

08 

06 

08 


s 1210 

08 

08 

09 

0F 

0F 

00 

0F 

01 


: 1218 

0F 

08 

0F 

04 

09 

09 

09 

08 


si 220 

08 

08 

08 

08 

09 

08 

09 

©7 


s 1228 

07 

©9 

09 

09 

09 

09 

08 

09 


s 1230 

09 

©8 

08 

©8 

08 

08 

08 

©8 


s 1238 

©9 

08 

08 

09 

03 

03 

©F 

03 


5 1240 

0F 

08 

09 

09 

09 

09 

©8 

09 


: 1248 

09 

©8 

08 

08 

©8 

07 

©9 

09 


3 125© 

09 

09 

09 

09 

09 

09 

09 

08 


3 1258 

09 

©9 

08 

08 

08 

08 

08 

©8 


3 126© 

08 

08 

08 

09 

09 

0F 

0F 

00 


3 1268 

0F 

©9 

09 

09 

09 

08 

08 

©9 


3 1270 

07 

09 

08 

08 

08 

08 

08 

08 


s 1278 

09 

09 

07 

07 

©7 

09 

09 

©9 


3 1280 

©9 

09 

08 

08 

©8 

08 

08 

08 


sl£88 

08 

08 

©9 

08 

09 

0F 

02 

09 


s 1290 

09 

09 

09 

08 

07 

09 

09 

09 


3 1298 

08 

08 

09 

09 

©8 

08 

08 

09 


3 1200 

©9 

09 

07 

07 

07 

09 

08 

09 


sl£08 

09 

09 

08 

08 

08 

09 

08 

©8 


s 12B© 

08 

08 

08 

08 

©8 

09 

00 

09 


3 12B8 

©9 

08 

©8 

07 

©8 

08 

08 

©8 


3 1 2C0 

09 

09 

09 

09 

©8 

08 

09 

09 


3 12C8 

©7 

©7 

©9 

©9 

©9 

09 

09 

©9 


s 12D© 

©9 

09 

©8 

08 

08 

08 

08 

©8 


512D8 

©8 

©8 

©8 

06 

©6 

©9 

09 

09 


s 12E0 

©9 

08 

08 

08 

08 

©7 

©8 

08 


s 12E8 

©9 

©9 

09 

©9 

09 

©9 

©9 

09 


s 12F0 

09 

09 

07 

©7 

©9 

©9 

09 

09 


s 12F8 

09 

09 

09 

©8 

08 

08 

©9 

©8 


3 1300 

08 

©8 

©8 

08 

08 

08 

08 

08 


s 1308 

08 

©8 

08 

08 

08 

08 

09 

09 


3 1 31 0 

08 

09 

09 

09 

07 

09 

09 

09 


31318 

©9 

09 

09 

08 

©8 

08 

09 

©9 


3 132© 

09 

0F 

0C 

0F 

0C 

08 

08 

08 


sl328 

08 

08 

09 

09 

09 

08 

®8 

©8 


3 1330 

08 

09 

08 

©8 

09 

09 

08 

08 


s 1338 

09 

©9 

09 

®8 

08 

08 

08 

©8 


s 1340 

09 

09 

09 

07 

07 

08 

08 

08 


s 1348 

09 

0F 

©C 

0F 

©9 

00 

©9 

09 


5 1 

09 

09 

09 

0F 

09 

09 

09 

©8 


s 1358 

08 

09 

©9 

09 

09 

08 

09 

09 


s 1360 

©9 

©9 

09 

09 

09 

09 

09 

07 


s 1368 

09 

©9 

09 

09 

09 

09 

©9 

09 


3 1370 

09 

0F 

09 

0C 

0C 

©F 

09 

0C 


3 1378 

0C 

©F 

0F 

©C 

0C 

09 

©9 

©9 


s 1380 

09 

09 

0F 

09 

©9 

09 

09 

09 


3 1388 

09 

07 

0C 

07 

©7 

09 

09 

09 


s 1390 

09 

09 

09 

0F 

0F 

0C 

0C 

09 


s 1398 

©9 

0C 

09 

0C 

0C 

09 

09 

09 


3 1300 

09 

09 

0F 

0C 

05 

05 

0F 

0C 


3 1308 

0F 

0C 

0F 

07 

©9 

09 

07 

07 


513B0 

09 

09 

0F 

09 

0F 

09 

0F 

09 


s 13B8 

0C 

09 

05 

05 

05 

09 

09 

09 


3 1 3C0 

09 

0F 

0F 

0C 

0C 

09 

09 

09 


s 13C8 

09 

09 

09 

0C 

0C 

0C 

0C 

©F 





13D0 

0C 

0C 

0C 

0C 

0C 

0C 

0C 

0C 

13D6 

0F 

0C 

0F 

0F 

0C 

0C 

0C 

0C 

13E® 

0F 

0C 

0C 

0C 

09 

0F 

0C 

09 

13E8 

00 

0F 

04 

0F 

02 

0F 

00 

01 

13F0 

00 

0F 

00 

0F 

00 

0F 

00 

0F 

13F8 

0F 

0D 

0F 

0D 

0D 

0D 

0D 

0D 

1400 

E8 

E8 

62 

E2 

E2 

E2 

E2 

E2 

1408 

E2 

E2 

E2 

E2 

E2 

E2 

E£ 

E2 

1410 

E8 

E2 

E2 

E2 

E2 

EB 

EB 

EB 

1418 

E2 

E2 

E2 

E2 

E2 

E2 

E2 

E2 

1420 

E2 

E2 

E2 

E2 

EB 

E8 

E8 

E8 

1428 

E8 

EB 

82 

E£ 

E£ 

E2 

E2 

E2 

1430 

E2 

E2 

E2 

E£ 

E2 

E£ 

E2 

E2 

1438 

E2 

E2 

El 

E2 

EB 

E8 

E8 

EB 

1440 

E2 

E2 

E2 

E2 

E2 

E2 

E2 

E2 

1448 

E2 

E2 

E2 

E2 

E8 

EB 

E8 

EB 

1450 

E8 

E8 

E2 

E8 

E2 

E2 

E2 

E2 

1458 

E2 

E2 

E2 

E2 

E2 

E2 

E8 

E2 

1460 

El 

E2 

EB 

E2 

EB 

EB 

EB 

EB 

1468 

E2 

E2 

E2 

E2 

E2 

E2 

E2 

E2 

1470 

E2 

E2 

E2 

E2 

EB 

EB 

EB 

EB 

1478 

E8 

E8 

E8 

E8 

E8 

EB 

E8 

EB 

1480 

E8 

E8 

EB 

EB 

EB 

EB 

EB 

EB 

1488 

E8 

E8 

E8 

E8 

E8 

EB 

E8 

E8 

1490 

E8 

E8 

EB 

E8 

EB 

EB 

E8 

EB 

1498 

E8 

E8 

E8 

E8 

E8 

E8 

E8 

EB 

1400 

E8 

EB 

EB 

EB 

EB 

EB 

EB 

ES 

1408 

E8 

E8 

E8 

EB 

E8 

EB 

ES 

EB 

14B0 

E8 

EB 

EB 

EB 

EB 

E8 

EB 

EB 

14B6 

E8 

E8 

ES 

E8 

E6 

E8 

E8 

EB 

14C0 

E8 

EB 

EB 

EB 

EB 

EB 

EB 

EB 

14C8 

E8 

EB 

E8 

EB 

EB 

E8 

EB 

EB 

14D0 

E8 

EB 

EB 

EB 

EB 

EB 

EB 

ES 

14D8 

E8 

E8 

E8 

E6 

E8 

E8 

EB 

EB 

14E0 

EB 

EB 

EB 

EB 

EB 

EB 

EB 

EB 

14E8 

E8 

E8 

EB 

EB 

E8 

EB 

EB 

EB 

14F0 

E8 

EB 

E8 

E8 

EB 

EB 

EB 

EB 

14F8 

E8 

E8 

E8 

E8 

E8 

EB 

EB 

EB 

1500 

E8 

EB 

EB 

EB 

EB 

EB 

E8 

EB 

1508 

E6 

EB 

E8 

E8 

EB 

EB 

ES 

EB 

1510 

E8 

E8 

E8 

EB 

EB 

EB 

EB 

E8 

1518 

E8 

E8 

E8 

E6 

E8 

EB 

EB 

ES 

1520 

E8 

EB 

EB 

E8 

EB 

EB 

EB 

E3 

1526 

13 

13 

13 

13 

13 

E3 

E8 

EB 

1530 

E8 

EB 

EB 

EB 

EB 

E8 

EB 

EB 

1538 

E8 

E8 

E8 

E8 

E8 

E8 

E8 

ES 

1540 

E8 

EB 

EB 

E8 

E8 

EB 

EB 

EB 

1548 

EB 

E8 

E8 

E8 

EB 

E8 

EB 

13 

1550 

13 

El 

El 

El 

El 

13 

E8 

EB 

1558 

E8 

E8 

E8 

E8 

E8 

E8 

E8 

EB 

11560 

EB 

EB 

EB 

E8 

EB 

EB 

E8 

EB 

! 1568 

E8 

E8 

E8 

E8 

E8 

EB 

EB 

EB 

11570 

EB 

E8 

E8 

E8 

EB 

EB 

EB 

13 

11578 

El 

13 

13 

13 

13 

13 

E8 

EB 

11580 

E8 

E8 

EB 

E8 

EB 

E8 

EB 

EB 

11588 

E8 

E8 

E8 

E8 

E8 

EB 

EB 

EB 

11590 

E8 

EB 

ES 

E8 

E8 

EB 

EB 

EB 

11598 

EB 

E8 

E6 

E8 

E8 

EB 

E8 

13 

11500 

13 

13 

13 

13 

13 

13 

E8 

E8 



1508 

EB 

EB 

E8 

EB 

EB 

EB 

EB 

EB 


15B0 

E8 

E8 

EB 

EB 

E8 

EB 

EB 

EB 


15B8 

E8 

E8 

EB 

EB 

EB 

EB 

EB 

ES 


15C0 

EB 

EB 

EB 

EB 

EB 

EB 

E3 

E3 


15C8 

13 

13 

13 

13 

13 

13 

E3 

EB 


15D0 

E8 

EB 

EB 

EB 

EB 

EB 

E8 

EB 


15D8 

EB 

E8 

EB 

EB 

EB 

EB 

EB 

EB 


15E0 

EB 

E8 

EB 

EB 

EB 

EB 

EB 

EB 


15E8 

EB 

E8 

EB 

EB 

EB 

E8 

E3 

13 


15F0 

13 

El 

El 

El 

El 

13 

E3 

EB 


15F8 

E8 

EB 

EB 

EB 

EB 

EB 

EB 

EB 


1600 

E8 

E8 

EB 

EB 

EB 

EB 

EB 

EB 


1606 

E8 

EB 

EB 

EB 

EB 

EB 

EB 

EB 


1610 

E8 

E8 

EB 

EB 

EB 

EB 

E3 

13 


1618 

El 

El 

El 

El 

13 

13 

E3 

EB 


1620 

E8 

EB 

EB 

EB 

EB 

EB 

EB 

EB 


1628 

EB 

E8 

EB 

E8 

EB 

EB 

EB 

EB 


1630 

EB 

EB 

EB 

E8 

EB 

EB 

EB 

EB 


1638 

EB 

E8 

EB 

EB 

EB 

EB 

E3 

13 


1640 

13 

El 

El 

El 

13 

13 

E3 

E3 


1648 

EB 

E8 

EB 

EB 

EB 

EB 

EB 

EB 


1650 

EB 

E8 

EB 

EB 

EB 

EB 

EB 

EB 


1658 

EB 

EB 

EB 

EB 

EB 

EB 

EB 

EB 


1660 

EB 

EB 

EB 

EB 

EB 

E8 

E3 

EB 


1668 

13 

El 

El 

El 

El 

13 

EB 

E3 


1670 

E8 

EB 

EB 

EB 

EB 

EB 

EB 

EB 


1678 

EB 

EB 

EB 

EB 

EB 

EB 

EB 

E8 


1680 

EB 

E8 

EB 

EB 

EB 

EB 

EB 

EB 


16B8 

EB 

E6 

EB 

EB 

EB 

EB 

EB 

E3 


1690 

E3 

13 

El 

13 

13 

E3 

E3 

EB 


169B 

EB 

EB 

EB 

EB 

EB 

EB 

EB 

EB 


1600 

EB 

EB 

EB 

EB 

EB 

EB 

ES 

EB 


1608 

EB 

EB 

EB 

EB 

EB 

EB 

EB 

EB 


16B0 

EB 

EB 

EB 

EB 

EB 

EB 

EB 

E3 


16B8 

E3 

13 

13 

13 

E3 

E3 

EB 

EB 


16C0 

EB 

EB 

EB 

EB 

EB 

EB 

EB 

EB 


16C8 

E8 

EB 

EB 

EB 

EB 

EB 

EB 

EB 


16D0 

EB 

EB 

El 

EB 

El 

El 

El 

El 


16B6 

El 

El 

El 

EB 

EB 

EB 

EB 

13 


16E0 

13 

El 

El 

El 

13 

13 

El 

El 


16E8 

EB 

EB 

EB 

EB 

El 

El 

El 

El 


16F0 

El 

El 

El 

El 

El 

EB 

EB 

EB 


16FB 

EB 

EB 

El 

EB 

El 

El 

El 

El 


1700 

El 

El 

El 

EB 

EB 

EB 

EB 

El 


1708 

El 

El 

El 

Ei 

El 

El 

El 

El 


1710 

E8 

EB 

EB 

EB 

El 

El 

El 

El 


1716 

El 

El 

El 

El 

El 

EB 

EB 

E8 


1720 

EB 

EB 

EB 

51 

El 

El 

04 

El 


1728 

El 

El 

EB 

E8 

EB 

EB 

EB 

El 


1730 

El 

El 

E5 

45 

EB 

EB 

EB 

El 


1738 

EB 

E8 

EB 

EB 

El 

El 

El 

E5 


1740 

45 

EB 

EB 

EB 

El 

EB 

EB 

EB 


1748 

EB 

EB 

E5 

51 

54 

EB 

E4 

14 


1750 

E8 

El 

EB 

EB 

EB 

EB 

El 

El 


1758 

El 

El 

E4 

E4 

E5 

EB 

EB 

El 
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69 

60 

09 

29 

8D 

05 

D4 

09 


: 9648 

D0 

B9 

18 

00 

99 

27 

D0 

B9 


9820 

05 

8D 

06 

D4 

09 

02 

8D 

01 


s9650 

20 

00 

99 

F8 

5F 

E8 

E8 

CB 


9828 

D4 

09 

30 

8D 

00 

D4 

05 

28 


s9658 

C0 

08 

D0 

El 

09 

05 

8D 

25 


9830 

29 

07 

09 

20 

85 

28 

05 

28 


s 9660 

D0 

09 

00 

8D 

26 

D0 

05 

2F 


9838 

29 

FE 

8D 

04 

D4 

09 

01 

85 


:9668 

8D 

10 

D0 

05 

55 

8D 

0F 

D0 


9840 

28 

8D 

04 

D4 

09 

C0 

85 

69 


s9670 

05 

42 

8D 

0E 

D0 

05 

9F 

29 


9848 

60 

09 

29 

8D 

05 

D4 

09 

85 


3 9678 

01 

F0 

0E 

05 

46 

00 

8D 

0C 


9850 

8D 

06 

D4 

09 

15 

SD 

01 

D4 


3 9680 

D0 

05 

58 

8D 

0D 

D0 

4C 

94 


9858 

09 

30 

8D 

00 

D4 

05 

28 

29 


3 9688 

96 

05 

48 

00 

8D 

0C 

D0 

05 


9860 

07 

09 

80 

85 

28 

05 

28 

29 


s 9690 

50 

8D 

0D 

D0 

02 

00 

B5 

01 


9868 

FE 

8D 

04 

D4 

09 

01 

85 

£8 


3 9698 

6D 

IB 

D4 

65 

9F 

65 

9D 

75 


9870 

8D 

04 

D4 

09 

80 

85 

60 

60 


:96O0 

02 

60 

60 

60 

65 

4F 

95 

01 


9878 

05 

28 

29 

FE 

85 

28 

60 

05 


3 9608 

E8 

E0 

04 

D0 

E9 

09 

FF 

8D 


9880 

29 

29 

FE 

85 

29 

60 

05 

£0 


s96B0 

19 

D0 

68 

06 

68 

00 

68 

40 


9888 

29 

FE 

85 

20 

60 

78 

09 

00 


s 96B0 

78 

09 

0D 

8D 

21 

D0 

05 

56 


9890 

85 

6D 

05 

64 

C5 

61 

F0 

04 


s96C0 

8D 

0F 

D0 

05 

43 

8D 

0E 

D0 


9898 

B0 

19 

90 

14 

05 

63 

C5 

60 


3 96C8 

0D 

10 

D0 

29 

7F 

8D 

10 

D0 


9800 

F0 

04 

B0 

0F 

90 

00 

05 

62 


s 96D0 

05 

44 

29 

80 

F0 

08 

OD 

10 


9808 

C5 

5F 

F0 

04 

B0 

05 

90 

00 


s 96D8 

D0 

09 

80 

8D 

10 

D0 

09 

FB 


98B0 

4C 

48 

99 

4C 

FE 

99 

78 

05 


s96E0 

8D 

12 

D0 

OD 

11 

D0 

29 

7F 


98B8 

9F 

29 

01 

F0 

22 

02 

00 

00 


s96E8 

8D 

11 

D0 

09 

0F 

BD 

14 

03 


98C0 

00 

B9 

4F 

00 

F0 

19 

B9 

4F 


s 96F0 

09 

95 

8D 

15 

03 

09 

FF 

8D 


98C8 

00 

38 

E9 

01 

99 

4F 

00 

9D 


3 96F8 

19 

D0 

68 

08 

68 

00 

66 

40 


98D0 

01 

D0 

B9 

3C 

00 

9D 

00 

D0 


3 9700 

09 

05 

8D 

05 

D4 

09 

85 

8D 


98D8 

EB 

E8 

ca 

C0 

06 

D0 

E£ 

05 


3 9708 

06 

D4 

09 

03 

8D 

01 

D4 

09 


98E0 

44 

BD 

10 

D0 

02 

00 

05 

9F 


s 9710 

20 

8D 

00 

D4 

05 

28 

29 

07 


98EB 

29 

03 

D0 

28 

OE 

21 

D0 

CO 


39718 

09 

80 

85 

28 

05 

28 

29 

FE 


9SF0 

8E 

21 

D0 

05 

8D 

D0 

ID 

09 


s 9720 

8D 

04 

D4 

09 

01 

85 

28 

8D 


98F8 

OC 

8D 

05 

D4 

09 

04 

8D 

06 


s97£8 

04 

D4 

09 

50 

85 

69 

60 

09 


9900 

D4 

09 

81 

SD 

04 

D4 

09 

05 


s 9730 

05 

8D 

05 

D4 

09 

85 

8D 

06 


9908 

8D 

01 

D4 

09 

68 

8D 

00 

D4 


s 9738 

D4 

09 

04 

8D 

01 

D4 

09 

20 


9910 

09 

01 

85 

8D 

EO 

09 

FF 

8D 


3 9740 

8D 

00 

D4 

05 

28 

29 

07 

09 


9918 

ID 

D0 

8D 

17 

D0 

09 

FB 

8D 


3 9748 

80 

85 

28 

05 

28 

29 

FE 

8D 


9920 

12 

D0 

OD 

11 

D0 

29 

7F 

8D 


s 9750 

04 

D4 

09 

01 

85 

28 

8D 

04 


9928 

11 

D0 

09 

01 

85 

00 

E6 

9F 


3 9758 

D4 

09 

50 

85 

69 

60 

09 

50 


9930 

E6 

9E 

05 

9E 

49 

3C 

D0 

04 


3 9760 

8D 

05 

D4 

09 

85 

8D 

06 

D4 


9938 

85 

9E 

E6 

9D 

EO 

09 

FF 

8D 


3 9768 

09 

05 

8D 

01 

D4 

09 

20 

8D 


9940 

19 

D0 

68 

08 

68 

00 

68 

40 


:9770 

00 

D4 

05 

28 

29 

07 

09 

20 


9948 

78 

09 

00 

85 

44 

8D 

F8 

5F 


3 9778 

85 

28 

05 

28 

29 

FE 

8D 

04 


9950 

8D 

F9 

5F 

09 

12 

8D 

FO 

5F 


s9780 

D4 

09 

01 

85 

28 

8D 

04 

D4 


9958 

09 

10 

8D 

FB 

5F 

09 

11 

8D 


s9788 

09 

20 

85 

60 

60 

09 

50 

8D 


9960 

FC 

5F 

09 

IF 

8D 

15 

D0 

09 


s9790 

05 

D4 

09 

85 

8D 

06 

D4 

09 


9968 

03 

BD 

1C 

D0 

09 

D0 

85 

4F 


s9798 

07 

8D 

01 

D4 

09 

20 

8D 

00 


9970 

85 

50 

85 

51 

85 

52 

85 

53 


s 9700 

D4 

05 

28 

29 

07 

09 

20 

85 


9978 

85 

54 

09 

30 

85 

3C 

09 

F0 


3 9708 

28 

05 

28 

29 

FE 

8D 

04 

D4 


9980 

85 

3D 

09 

63 

85 

3E 

09 

9D 


S97B0 

09 

01 

85 

28 

8D 

04 

D4 

09 


9988 

85 

3F 

09 

CD 

85 

40 

09 

00 
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2 999© 

8D 

04 

D4 

89 

01 

8D 

29 

D0 


2 9890 

8C 

85 

8C 

C8 

D0 

B8 

4C 

18 


s 9990 

8D 

28 

D0 

8D 

2B 

D0 

8D 

0B 


2 9898 

9B 

29 

40 

F0 

3F 

C8 

B1 

8B 


2 9980 

D4 

89 

B6 

8D 

14 

03 

89 

98 


2 9880 

85 

8D 

CB 

89 

5C 

18 

71 

8B 


: 9988 

8D 

15 

03 

89 

FB 

8D 

12 

D0 


2 9888 

85 

8E 

80 

00 

B1 

8D 

29 

F0 


: 9960 

8D 

11 

D0 

29 

7F 

8D 

11 

D0 


2 98B0 

85 

95 

85 

9B 

D0 

07 

85 

95 


2 99B8 

58 

89 

00 

85 

9D 

89 

00 

85 


2 98B8 

09 

04 

4C 

C4 

98 

8D 

21 

D0 


2 99C0 

80 

85 

9D 

C9 

18 

D0 

08 

89 


2 98C0 

29 

0F 

05 

95 

91 

BD 

85 

8B 


2 99C8 

80 

8D 

04 

D4 

4C 

7C 

83 

D0 


2 98C8 

18 

69 

03 

85 

8B 

89 

00 

65 


:99D0 

0D 

85 

9F 

29 

03 

D0 

07 

8E 


2 98D0 

8C 

85 

8C 

C8 

F0 

03 

4C 

50 


2 99D8 

21 

D0 

E8 

8E 

21 

D0 

85 

80 


2 98D8 

98 

4C 

18 

9B 

C8 

B1 

8B 

85 


2 99E0 

8D 

00 

DC 

2D 

01 

DC 

29 

10 


2 98E0 

BD 

CB 

89 

5C 

18 

71 

8B 

85 


2 99E8 

85 

9C 

85 

9D 

C9 

04 

90 

07 


2 98E8 

BE 

80 

00 

B1 

8D 

29 

0F 

85 


2 99F0 

85 

9C 

D0 

03 

4C 

7C 

83 

85 


2 98F0 

95 

85 

9B 

D0 

07 

85 

95 

09 


2 99F8 

80 

F0 

E3 

4C 

BD 

99 

78 

89 


2 98F8 

40 

4C 

05 

9B 

8D 

21 

D0 

08 


2 9800 

00 

85 

8B 

89 

1C 

85 

8C 

89 


2 9B00 

08 

08 

08 

05 

95 

91 

8D 

85 


2 9808 

FF 

8D 

ID 

D0 

89 

00 

85 

9D 


s9B08 

8B 

18 

69 

03 

85 

8B 

89 

00 


2 9810 

8D 

04 

D4 

8D 

0B 

D4 

8D 

15 


2 9B10 

65 

8C 

85 

8C 

C8 

F0 

03 

4C 


29818 

D0 

85 

9B 

89 

02 

8D 

01 

D4 


29B18 

50 

98 

85 

9B 

F0 

03 

4C 

4E 


2 9820 

8D 

00 

D4 

89 

CF 

8D 

05 

D4 


2 9B20 

98 

85 

9D 

C9 

18 

D0 

03 

4C 


2 9828 

89 

00 

8D 

06 

D4 

89 

81 

8D 


2 9B28 

7C 

83 

85 

80 

8D 

00 

DC 

2D 


2 9830 

04 

D4 

89 

48 

8D 

14 

03 

89 


:9B30 

01 

DC 

29 

10 

85 

9C 

85 

9D 


2 9838 

9B 

8D 

15 

03 

89 

FB 

BD 

12 


2 9B38 

C9 

04 

90 

07 

85 

9C 

D0 

03 


2 9840 

D0 

8D 

11 

D0 

29 

7F 

BD 

11 


2 9B40 

4C 

7C 

83 

85 

80 

F0 

E3 

4C 


2 9848 

D0 

58 

89 

00 

85 

80 

82 

04 


2 9B48 

48 

98 

85 

9F 

29 

03 

D0 

0B 


2 9850 

80 

00 

B1 

8B 

10 

43 

C9 

FF 


:9B50 

85 

9B 

F0 

07 

8C 

21 

D0 

CB 


2 9858 

D0 

0F 

89 

01 

85 

9B 

89 

00 


2 9B58 

8C 

21 

D0 

89 

01 

85 

80 

E6 


2 9880 

85 

8B 

89 

1C 

85 

8C 

4C 

21 


:9B60 

9E 

E6 

9F 

85 

9E 

49 

3C 

D0 


2 9888 

9B 

C8 

B1 

8B 

85 

8D 

CS 

89 


:9B68 

04 

85 

9E 

E6 

9D 

E8 

89 

FB 


2 9870 

D8 

18 

71 

8B 

85 

BE 

85 

9B 


:9B70 

8D 

12 

D0 

8D 

11 

D0 

29 

7F 


2 9878 

D0 

05 

89 

04 

4C 

82 

98 

8D 


2 9B78 

8D 

11 

D0 

89 

FF 

8D 

19 

D0 


2 9880 

21 

D0 

80 

00 

91 

BD 

85 

8B 


:9B80 

68 

88 

68 

88 

68 

40 

E8 

E8 


2 9888 

18 

69 

03 

85 

8B 

89 

00 

65 












Listing C-24: The BOGHOP Program, Source Code for the BOGHOP.O Program 


1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1 100 
1 110 
•1120 
1130 


;PUT"30:BOGHOP" 

; LOAD"ASM",8 

•BOGHOP GAME 

5 

;TQ START THE GAME FROM BASIC 
?TYPE ' SYS 5120 x 

•CREATED 7/17/84 

5<C> COPYRIGHT 1984, STEVEN BRESS 

; LATEST ADDITIONS 11/15/84 
: 03:30 PM 
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1140 


.OPT LIST,NOSYM,NOGEN 

1 150 

5 


1160 


•PAGE 'MACRO LIBRARY' 

1170 


.LIB MACLIB 

11 80 


.PAGE 'SYSTEM DEFINITIONS' 

1 190 


.LIB SYSDEF 

1200 


.PAGE 'RAM DEFINITIONS' 

1210 


.1 IB B09DEF 

1220 


.PAGE 'NOTE DEFINITIONS' 

1230 


.LIB COMMON 

1240 

; 


1250 

* 

= $1400 

1260 


JMP TOP 

1270 

• 


1230 

;LOOKUPS IN FILE LKUP 

1 290 

: 


1300 


.PAGE 'DATA SEGMENT' 

1310 


.LIB BOGDAT :DATA FILE 

1320 


.PAGE 'POINT PLOTTING' 

1 330 


.LIB XXPLOT 

1340 


.PAGE 'BOG HOP CODE' 

1350 

: 


1360 

ZERO 

= $1042 

1370 

ONE 

= $1052 

1380 

TWO 

= $1062 

1390 

THREE 

= $1072 

1400 

FOUR 

= $1082 

1410 

FIVE 

= $1092 

1420 

SIX 

= $10A2 

1430 

SEVEN 

= $10B2 

1440 

EIGHT 

= $10C2 

1450 

NINE 

= $10D2 

1460 

NUL 

= $10E2 

1470 

UCLKLO 

= $10F2 

1480 

VCLKHI 

= $110B 

1490 

VLKUPL 

= $1125 

1500 

VLKUPH 

= $11FD 

1510 

HLKUPL 

= $12CD 

1520 

HLKUPH 

= $12F5 

1530 

? 


1540 

5 


1550 

RET 

RTI 

1560 

TOP 

SEI 

1570 

5 


1580 


KILL 

1590 


ADRES INT0,CINV \ SET-UP l'ST INTERRUPT 

1600 



1610 


LDMEM #BLACK,BORCL 

1620 


STA BCOL0 

1630 


BANK 1 

1640 


GRABAS $2800 ;SCREEN 2 $6000 

1650 


TXBAS $1C00 ;TEXT 2 $5C00 

1660 


ADRES $6000,GBASE 

1670 


GRAPH i BIT-MAPPED GRAPHICS ON 

1630 


MULTON ;MULTI COLOR MODE ON 

1690 


ML'COL WHITE ; CLEAR COLOR RAM TO WHITE 

1700 


FILL $6000,$00,$20 ;CLEAR GRAPHICS PAGE 

1710 


FILL $5C00,$56,$04 ;GREEN AND PURPLE 

1720 

5 
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START WITH 3 LIVES 


1730 i 
1740 ; 
1750 
1760 
1770 
1730 
1790 ; 
1800 
1810 s 
1820 5 
1330 
1840 
1850 
I860 
1870 
1380 
1890 
1900 
1910 ; 
1920 
1930 
1940 
1950 
I960 
1970 
1930 
1990 
2000 ; 
2010 
2020 
20 30 
2040 
20 50 
2060 
2070 
2030 
2090 ; 
2100 
2110 
2120 
2130 
2140 
2150 
2160 
2170 
2180 ; 
2190 
2200 
2210 
2220 
2230 
2240 
2250 
2266 
2270 5 
2280 
2290 
2300 
2310 ; 


LDMEM #*03,LIVES ; 

STA COLOR 
LDMEM #*01,HORNC 
LDMEM #*01,VERNC 

LDMEM #*14,PLAYP ;PLAYER SPRITE POINTER 


LDMEM #*2A,MOUNTV ;MOUNTAIN VERTICAL SETTING 

STA MQUNTV+1 

STA MOUNTV+2 

STA MOUNTV+ 3 

LDMEM #*2D,MOUNTV+ 4 

STA MOUNTV+5 

STA MOUNTV+ 6 

STA MOUNTV+ 7 

LDMEM #*00,MOUNTH ;MOUNTAIN HORIZONTAL INITIAL POSITION 

LDMEM #*30.MOUNTH+1 

LDMEM #*60,M0UNTH+2 

LDMEM #*90,M0UNTH+3 

LDMEM #*C0,M0UNTH+4 

LDMEM #*F0 jMOUNTH+5 

LDMEM #*20,M0UNTH+6 

LDMEM #*50,MOUNTH+7 

LDMEM #*09,MOUNTC ;MOUNTAIN COLOR 

STA MOUNTC+1 

STA MOUNTC+2 

STA MOUNTC+3 

STA MOUNTC+4 

STA"MOUNTC+5 

SVC MOUNTC+6 

STA MOUNTC+7 

LDMEM #*20,MOUNTP ;POINTER 
LDMEM #*21,MOUNTP+l 
LDMEM #*22,MOUNTP+ 2 
LDMEM03*23,MOUNTP+3 
LDMEM #*20,MOUNTP+4 
LDMEM #*21,M0UNTP+5 
LDMEM #*22,MOUNTP+ 6 
LDMEM #*23,M0UNTP+7 

LDMEM #WHITE,PLAYC ;PLAYER COLOR 

LDMEM #GREEN,MEANC 

STA MEANC+1 

STA MEANC+2 

STA MEANC+3 

STA MEANC+4 

STA MEANC+5 

STA MEANC+6 

LDMEM #RED,SPMCL0 
LDMEM #YELOW,SPMCL1 
LDMEM #*FF,BPRIOR 
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2320 

5 


2330 


LDMEM #$C0,MNTMSB 5 SET THE MSB IN MOUNTH+7 

2340 

5 


2350 

sTHE 

MOUNTAINS WILL BE SET UP 

2360 

:DURING INT0 

2370 

5 


2380 

; INTI 

WILL SET UP THE PLAIERS 

2390 

5 


2400 

5 


2410 


LDMEM #$00,SCORE ;CLEAR SCORE 

2420 


STA SCORE*1 

2430 


STA SCORE+2 

2440 


STA SCORE+3 

2458 

5 


2460 


LDMEM #$01,LEVEL ;START 3 LEVEL1 

2470 

5 


2480 

; SET 

SOUND GENERATOR 3 TO NOISE 

2490 

:TO BE USED FOR RANDOM NUMBERS 

2500 

5 


2510 


ADRES AN3,S2FRL0 

2520 


ADRES CN4,SIFRLO 

2530 


LDMEM #$0F ,MMGD ;VOLUME=MAX 

2540 


LDMEM #$20,SICORG ;TRIANGLE WAVE 

2550 


LDMEM #$28.SIATDC 

2560 


LDMEM #$ 88 ,SISURL 

2570 


LDA #<GN 6 

2580 


STA S3FRL0 

2590 


LDA #>GN 6 

2600 


STA S3FRHI 

2610 


LDMEM #$ 88 ,V3C0RG 

2620 


LDMEM #$80,V3CORG ;RESET CHANNEL 

2630 


STA S3C0RG 

2640 

5 


2650 

5 


2660 

:INITIALIZE PLAYER POSITIONS 

2670 

J 


2680 


LDMEM #$FF,WHOLIV 

2690 


LDMEM #$30,PLAYH 

2700 


LDMEM #$70,PLAYV 

2710 

5 


2720 


LDMEM #$ 68 ,MEANV ;BAD GUY VERT 

2730 


LDMEM #$70,MEANV+1 

2740 


LDMEM #$30,MEANV+2 

2750 


LDMEM #$90,MEANV+3 

2760 


LDMEM #$A0,MEANV+4 

2770 


LDMEM #$B0,MEANV+5 

2780 


LDMEM #$C5,MEANV+ 6 

2790 

5 


2800 


LDMEM #$90,MEANH ;BAD GUY HORI2 

2810 


LDMEM #$95,MEANH+1 

2820 


LDMEM #$85,MEANH+2 

2830 


LDMEM #$90,MEANH+3 

2840 


LDMEM #$70,MEANH+4 

2850 


LDMEM #$75,MEANH+ 5 

2860 


LDMEM #$95,MEANH +6 

2870 

5 


2880 

5 


2890 


ADRES BEE1,MEANMV 

2900 


ADRES BEE2,MEANMV+ 2 
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2910 


ADRES BEE3,MEANMV+ 4 

2920 


ADRES BEE4,MEANMV+6 

2930 


ADRES BEE1,MEANMV+8 

2940 


ADRES BEE2,MEANMV+*A 

2950 


ADRES BEE3.MEANMV+*C 

2960 

! 



2970 

5 



2930 


LDA SSCOL 

;CLEAR COLLISION REGISTERS 

2990 


LDA SBCOL 


3000 

5 



3010 

5 



3020 

1 



3030 

> 



3040 


RAST #*FB 


3050 


CLI 


3060 

5 



30 70 

START 

ANOP 

;BEGINNING OF PROGRAM 

3030 

: 



3090 


LDA LIYES 

$SEE IF GAME OVER 

3100 


ORA PLAYE 


31 10 


ORA MEANE 


3120 


ORA MEANE+1 


3130 


ORA MEANE+2 


3140 


ORA MEANE+3 


3150 


ORA MEANE+4 


3160 


ORA MEANE+5 


3170 


ORA MEANE+6 


3130 


JEQ STWID 

-.PASS OVER CODE IF OVER 

3190 

3 



3200 

3 



3210 

;UPDATE THE SCORE 


3220 

sSUPPRESS LEADING ZEROS 


3230 

5 



3240 


LDA SCREEN 

;DON'T UPDATE SCORE 

3250 


AND ,#*0F 

:VERY OFTEN 

3260 


CMP #$0F 

;4 TIMES/SECOND 

3270 


JNE NOSCR1 


3230 

3 



3290 

5 



3300 


LDMEM #*0A,BUF 

;CLEAR TO NUL 

3310 


STA BUF+1 


3320 


STA BUF+2 


3330 


STA BUF+3 


3340 


STA BUF+4 


3350 


STA BUF+5 


3360 


STA BUF+6 


3370 


STA BUF+7 


3330 

3 



3390 


LDA SCORE+3 


3400 


AND #*F0 

;MASK HIGH BYTE 

3410 


NIBLR 

;SHI FT DATA RIGHT 

3420 


STA BUF 

:PUT IN BUFFER 

3430 

5 



3440 

NXDIG1 

LDA SCORE+3 


3450 


AND #*0F 

;MASK LOW BYTE 

3460 


STA BUF+1 

;NEXT BUFFER POSITION 

3470 

s 



3480 

NXDIG2 

LDA SCORE+2 - 


3490 


AND #*F0 






3500 


NIBLR 

3510 


STA BUF+2 

3520 

5 


3530 

NXDIG3 

LDA SCORE*2 

3540 


AND #*0F 

3550 


STA BUF+3 

3560 

5 


3570 

NXDIG4 

LDA SCORE*1 

3580 


AND #*F0 

3590 


NIBLR 

3600 


STA BUF+4 

3610 

5 


3620 

NXDIG5 

LDA SCORE*1 

3630 


AND #*0F 

3640 


STA BUF+5 

3650 

5 


3660 

NXDIG6 

LDA SCORE 

3670 


AND #*F0 

3680 


NIBLR 

3690 


STA BUF+6 

3700 



3710 

NXDIG7 

LDA SCORE 

3720 


AND #*0F 

3730 


STA BUF+7 

3740 

5 


3750 

5. 


3760 

;LEADING ZERO SUPPRESS!) 

3770 

5 


3780 


LDA BUF+0 

3790 


BNE NZSUP 

3800 

9 


3810 


LDMEM #$0A,BUF+0 

3820 



3830 


LDA BUF+1 

3840 


BNE NZSUP 

3850 

9 


3860 


LDMEM #$0A,BUF+1 

3870 

9 


3880 


LDA BUF+2 

3890 


BNE NZSUP 

3900 

9 


3910 


LDMEM #$0A,BUF+2 

3920 

9 


3930 


LDA BUF+3 

3940 


BNE NZSUP 

3950 

9 


3960 


LDMEM #$0A,BUF+3 

3970 

5 


3980 


LDA BUF+4 

3990 


BNE NZSUP 

4000 

5 


4010 


LDMEM #$0A,BUF+4 

4020 

9 


4030 


LDA BUF+5 

4040 


BNE NZSUP 

4050 

9 


4060 


LDMEM #*0A,BUF+5 

4070 

9 


4080 


LDA BUF+6 


:DIGIT 


; IF NOT 0—NO SUPPRESS 
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4090 

4100 

4110 

4120 

4130 

4140 

4150 

4160 

4170 

4180 

4190 

4200 

4210 

4228 

4230 

4240 

4250 

4260 

4270 

4280 

4290 

4300 

4310 

4320 

4330 

4340 

4350 

436© 

4370 

4380 

4390 

4400 

4410 

4420 

4430 

4440 

4450 

4460 

4470 

4480 

4490 

4500 

4510 

4520 

4530 

4540 

4550 

4560 

4570 

4580 

4590 

4600 

4610 

4620 

4638 

4640 

4650 

4660 

4670 


BNE NZSUP 
LDMEM #*0A,BUF+6 

NZSUP ANOP ;ALL LEADING 0=NUL 


THE SCORES ARE IN BUF TO BUF+7 


MKSCR1 


MKSCR2 


LDX #*00 

LDMEM #*00,LPCNT1 
ADRES *6000,BUF1+2 
LDA BUF,X 
ASL A 
TAY 

LDA NUMBER,Y 
STA BUF1 
LDA NUMBER+1,Y 
STA BUF1+1 
LDY #*00 
LDA < BUF1).Y 
STA < BUF1+2),Y 
I NY 

CPY #*10 
BNE MKSCR2 


DBINC BUF1+2,*10 


I NX 

CPX #*08 

BNE MKSCR1 ;REPEAT FOR 8 DIGITS 


NOSCR1 ANOP 
jSCORES ARE ON SCREEN 


MOVE THE CURRENT BAD GUYS 


LDA SCREEN 5MOVE THE BAD GUYS ON 

AND #*01 ;EVERY OTHER SCREEN 

JEQ MVEM8 


LDX #*00 
LDY #*00 
STY LPCNT1 

MVEM ANOP 

LDA WHOLIV 
LDY LPCNT1 
AND BITPOS,Y 
BEQ MVEM3 
LDA MEANE,Y 





4686 


BNE 

MV EM 3 


4690 

f 




4700 


LDA 

< MEANMV,X) 

;GET NEXT MOVEMENT BYTE 

4710 


BNE 

MVEM1 

; GOOD CODE—MOVE 

4720 

5 




4730 

5CHOOSE A NEW DIRECTION 


4740 

1 




4750 


LDY 

LEVEL 


4760 


LDA 

BADSEQ,Y 


4770 


ASL 

A 


4780 


TAY 



4790 


LDA 

BASLK,Y 

;THE BASE ADDRESS OF 

4300 


STA 

BUF 

;THE LOOKUP TABLE OF 

4810 


LDA 

BASLK+1,Y 

;MOVEMENT PATTERNS 

4820 


STA 

BUF+1 

5IS IN BUF 

4830 

5 




4840 


LDA 

RAND1 

;GET A RANDOM NUMBER 

4850 


AND 

#*06 

;TO CHOOSE A NEW MOVEMENT PATTERN 

4860 


TAY 



4870 

5 




4880 


LDA 

< BUF) , Y 


4890 


STA 

MEANMV,X 

:PUT THE NEW ADDRESS INTO 

4900 


I NY 


;THE MOVEMENT REGISTERS 

4910 


LDA 

< BUF),Y 


4920 


STA 

MEANMV+1 f X 


4930 


TXA 



4940 


ADC 

RAND1 


4950 


EOR 

SCREEN 


4960 


AND 

#*07 


4970 


ADC 

MEANMV.X 


4980 


STA 

MEANMV,X 


4990 


LDA 

#*00 


5000 


ADC 

MEANMV+1,X 


5010 


STA 

MEANMV+1.X 


50 20 

5 




50 30 


LDA 

<MEANMV.X) 

;GET THE DIRECTION BYTE 

5040 

: 




5050 

MV EMI 

STA 

BUF 1 

5HIDE THE DIRECTION 

5060 


LDY 

LEVEL 


5070 


LDA 

SPEEDH,Y 


5080 


STA 

HORNC 

:GET THE HORIZONTAL 

50 90 


LDA 

SPEEDV,Y 

5AND VERTICAL SPEED 

5100 


STA 

VERNC 


5110 

1 




5120 


LDY 

LPCNT1 


5130 

! 




5140 


LDA 

MEAND,Y 


5150 


BEQ 

MV EM 2 

;IF DIRECTION=l THEN 

5160 

5 




5170 


LDA 

BUF 1 

;INVERT THE BITS 

5180 


NOT 



5190 


STA 

BUF1 


5200 

5 




5210 

MVEM2 

LDA 

BUF1 

;COPY THE BYTE TO 

5220 


STA 

BUF1+1 

;BUF1+1 

5230 

5 




5240 


ROR 

BUF 1 


5250 


BCC 

MV EM 4 


5260 


JSR 

UP 
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5270 

5 


5280 

MU EM 4 

ROR BUF1 

5290 


BCC MUEM5 

5300 


JSR DN 

5310 

5 


5320 

MUEM5 

ROR BUF1 

5330 


BCC MUEM6 

5340 


JSR LT 

5350 

j 


5360 

MU EM 6 

ROR BUF1 

5370 


BCC MUEM3 

5380 


JSR RT 

5390 

9 


5400 

MUEM3 

ANOP 

5410 


LDA MEANMU,X ;INCREMENT MOUEMENT 

5420 


CLC 

5430 


ADC #*01 

5440 


STA MEANMU,X 

5450 


LDA MEANMU+1,X 

5460 


ADC #*00 

5470 


STA MEANMU+1,X 

5480 

5 


5490 


I NX 

5500 


I NX 

5510 


INC LPCNT1 ;BUMP LOOP COUNTER 

5520 


LDA LPCNT1 

5530 


CMP #*07 ;DO IT 7 TIMES 

5540 


JNE MUEM 

5550 

9 


5560 

MU EM 8 

ANOP 

5570 

5 


5580 

; DONE 

MOUING HERE 

5590 

5 


5608 

5 


5610 

sCHECK AND INCREMENT LEUEL NEXT 

5620 

5 WHEN 

WHOLIU=0 —GOT0 NEXT LEUEL 

5630 

5 


5640 


LDA WHOLIU 

5650 


AND #*7F ;PLAYER DOESN'T COUNT 

5660 


JNE LEUDN :BRANCH TO LEUEL CHECK DONE 

5670 

: 


5680 


LDMEM #*FF,WHOLIU 

5690 

5 


5700 

;RESTART BAD GUYS POSITIONS 

5710 

5 


5720 


LDX #*00 

5730 


LDMEM #*70,BUF ;UERTICAL OFFSET 

5740 


LDA RAND1 ;GET A RANDOM NUMBER 

5750 


AND #*7F -.NUMBER TO ADD TO OFFSET 

5760 


ADC BUF 

5770 


STA MEANU : FIRST UERTICAL 

5780 

5 


5790 


LDA RAND2 

5800 


AND #*7F 

5810 


ADC BUF 

5820 


STA MEANU+1 

5830 

• 

j 


5840 


LDA RAND3 

5850 


AND #*7F 
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5860 
5870 
5880 ; 
5890 
5900 
5910 
5920 
5930 ; 
5940 
5950 
5960 
5970 
5960 
5990 ? 
6000 
6010 
6020 
6030 
6040 
6050 ; 
6060 
6070 
6080 
6090 
6100 
6110 ; 
6120 
6130 
6140 
6150 
6160 
6170 
6180 
6190 : 
6200 
6210 
6220 
6230 
6240 
6250 
6260 
6270 : 
6280 
6290 
6300 
6310 
6320 
6330 
6340 ; 
6350 
6360 
6370 
6380 
6390 
6400 
6410 
6420 
6430 
6440 


ADC BUF 
STA MEANV+2 

LDA RAND4 
ADC #$7F 
ADC BUF 
STA MEANV+3 

LDA RAND1 

EOR RAND2 ; MODIFY RANDOM # 

AND #$7F 
ADC BUF 
STA MEANV+4 

LDA RAND2 
EOR RAND3 
AND #$7F 
ADC BUF 
STA MEANV+5 

LDA RAND3 
EOR RAND1 
AND #$7F 
ADC BUF 
STA MEANV +6 


LDMEM #$90,MEANH 5 HORIZONTALS 

LDMEM #$85.MEANH+1 

LDMEM #$95,MEANH+2 

LDMEM #$70.MEANH+3 

LDMEM #$75,MEANH+4 

LDMEM #$90.MEANH+5 

LDMEM #$80 5 MEANH +6 

LDMEM #$00,MEAND ;CLEAR DIRECTIONS 

STA MEAND+1 

STA MEAND+2 

STA MEAND+3 

STA MEAND+4 

STA MEAND+5 

STA MEAND +6 


ADRES NUL,MEANMV ;SET MOVEMENT DIRECTION 
ADRES NUL;MEANMV+ 2 :POINTERS TO POINT 
ADRES NUL,MEANMV+4 ;AT KNOWN ZEROS 
ADRES NUL.MEANMV +6 :CAUSING NEW DIRECTIONS 
ADRES NUL,MEANMV +8 ;TO BE CHOSEN 
ADRES NUL.ME ANMV+$0A 


LDX LEVEL 
LDA BADSEQ.X 
ASL A 
ASL A 
TAX 

STX MEANP 
STX MEANP +6 
I NX 

STX MEANP+1 
STX MEANP+3 


; GET LEVEL 

5 FIND THE NEXT BAD GUY 
; MULTI PLY BY 4 

: USE AS A SPRITE POINTER BASE 
; DON ' T ALL FLAP AT ONCE 
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6450 


I NX 



6460 


STX 

MEANP+2 


6470 


I NX 



6480 


STX 

MEANP+4 


6490 


STX 

MEANP+5 


6500 

? 




6510 

> 




6520 

; ALL DONE WITH RESETTING 

6530 

! 




6540 


INC 

LEVEL 


6550 


LDA 

LEVEL 


6560 


CMP 

#*1 2 

5MAXIMUM DEFINED LEVEL 

6570 


BCC 

LEVDN 


6580 

5 




6590 


DEC 

LEVEL 

5LEVEL TOO HIGH 

6600 

5 




6610 

LEVDN 

ANOP 


6620 

5 




6630 

:CHECK 

THE 

SCREEN POSITION 

6640 

;TO CHANGE 

DIRECTION 


6650 


LDX 

#*00 


6660 


LDY 

#*00 

;CLEAR INDEXES 

6670 

5 




6680 

DIRCK1 

LDA 

MEANH,X 


6690 


CMP 

#*16 

;REVERSE DIRECTION 

6700 


BCS 

DIRCK2 

;IF AT THE LEFT SIDE 

6710 

5 




6720 


LDA 

#*01 

5 OF THE SCREEN 

6730 


STA 

MEAND,X 


6740 

5 




6750 

DIRCK2 

CMP 

#*98 

;CHECK RIGHT SIDE 

6760 


BCC 

DIRCK3 


6770 

y 




6780 


LDA 

#*0 0 


6790 


STA 

MEAND,X 


6300 

5 




6810 

DIRCK3 

I NX 



6820 


CPX 

#*07 

;REPEAT FOR ALL 7 

6830 


BNE 

DIRCK1 


6840 

5 




6850 





6360 





6870 

jCHECK 

COLLISIONS BETWEEN THE 

6830 

:PLAYER'S SHOT AND THE BAD GUYS 

6890 

;NO CHECK FOR A DEAD 

BAD GUY 

6900 

y 




6910 

;THE PLAYER AND HIS SHOT ARE 

6920 

^MULTIPLEXED WITH THE 

SHOT ON 

6930 

:ODD SCREENS 


6940 

: 




6950 


LDA 

SCREEN 


6960 


AND 

#*01 

;THE SHOT ISN'T UP IF 

6970 


JNE 

BCOLND 

;NO BAD GUYS HIT— 

6980 

; 




6990 

■FIRST 

FIND IF THERE 

IS A HIT 

7000 

5THEN FIND 

WHO WAS HIT 

7010 

; 




7020 


LDA 

TMSCOL 


7030 


AND 

#*01 

;WAS THE SHOT HIT 
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7040 

70 50 
7060 
7070 
70S© 
7090 
7100 

71 l© 
7120 
7130 
7140 
7156 
7160 
7170 
7180 
7190 
7200 
7210 
7220 
7230 
7240 
7250 
7260 
7270 
7230 
7290 
7300 
7310 
7320 
7330 
7340 
7350 
7360 
7370 
7330 
7390 
7400 
7410 
7420 
7430 
7440 
7450 
7460 
7470 
7480 
7498 
7500 
7510 
7520 
7530 
7540 
7550 
7560 
7570 
7580 
7590 
7600 
7610 
7620 


JEQ BCOLND ;BY A BAD GUY 

■A HIT IF HERE—SEE IF ALIUE 


LDA WHQLIV 
ASL A 
STA BUF 
LDA TMSCOL 
AND #*FE 
AND BUF 
BEQ BCOLND 

•FIND THE HIT HERE 

LSR A 
STA BUF 


j 

BHIT0 


LDX #*00 
ANOP 
ROR BUF 
BCC NOBCOL 
LDA MEANE,X 
BNE NOBCOL 


; POSITION BITS TO MATCH COLLISION REGISTER 


5 CLEAR PLAYER SHOT 
5 IF ZERO-NO HIT 


: I F CLEAR—NOT HIT 
;SEE IF EXPLODING 
;NEXT IF IT IS 


; IF HERE—MIGHT BE HIT 


LDA MEANL»,X 
CLC 

ADC #*10 
SEC 

SBC SHOTSC+0 
CMP #*1@ 

BCS NOBCOL 


$ SEE IF THE VERT IS IN RANGE 

5ADD AN OFFSET 

; SUBTRACT PLAYER SHOT 
; IF THE RESULT IS NOT 
5 IN RANGE—BRANCH 


VERTICAL IS IN RANGE, CHECK HORIZONTAL 
5 

LDA MEANH,X 
CLC 

ADC #*0C: 

SEC 

SBC SHQTSH+0 
CMP #*0C 
BCS NOBCOL 


IT'S 


A HIT IF HERE 


; START EXPLOSION 


; START EXPLOSION TIMER 

LDA #*C0 ?ABOUT 3 SECONDS 

STA MEANE.X 
LDA #*13 
STA MEANP.X 


sEXPLODE HERE WITH SOUND 
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7630 
7640 
7650 
7660 
7670 
7630 
7690 
7700 
7710 
7720 
7730 
7740 
7750 
7760 
7770 
7730 
7790 
7300 
7810 
7820 
7830 
7840 
7850 
7360 
7870 
7830 
7890 
7900 
7910 
7920 
7930 
7940 
7950 
7960 
7970 
7980 
7990 
8000 
8010 
8020 
3030 
8040 
8050 
3060 
8070 
8030 
3090 
3100 
81 1 © 
8120 
8130 
8140 
8150 
8160 
8170 
3180 
8190 
3200 
8210 


ADRES GN 6 ,S2FRL0 
LDMEM #$05.S2ATDC 
LDMEM #$00 ,S2SURL 
LDMEM #$80,V2CORG 
LDMEM #$81,S2C0RG 
LDMEM #$18.SNDTM2 


HI EXPLOSION TONE 


: CLEAR SOUND CHANNEL 
•ENABLE CHANNEL 


ADD TO SCORE HERE 


100 POINTS + 3*LEVEL 
LDA LEVEL 

ASL A 5 MULTIPLY LEVEL BY 8 

ASL A 
ASL A 


SED 

CLC 

ADC SCGRE+0 
STA SCORE+0 
LDA SCORE+1 
ADC #$01 
STA SCORE+1 
LDA SCORE+2 
ADC #$00 
STA SCORE+2 
LDA SCORE+3 
ADC #$00 
STA SCORE+3 
CLD 


;SET DECIMAL ARITHMETIC MODE 
5 CLEAR THE CARRY BIT 


;ADD THE 100 POINTS 


KILL SHOT AFTER A HIT 

LDA SHOTS 
AND #$FE 
STA SHOTS 
JMP BCOLND 


NOBCOL INX 

CPX #$07 
BNE BHIT0 

BCOLND ANQP 


SEE IF PLAYER WAS HIT 

THE PLAYER IS ON EVEN SCREENS 

LDA SCREEN 
AND #$01 
BEQ NOPCOL 

LDA TMBCOL 
AND #$01 



8220 BEQ NOPCOL 

8230 s 

8240 :PLAYER HIT IF HERE 

8250 5 PRETTY EASY WHEN THE HARDWARE 

8260 ;CAN CHECK COLLISIONS FOR YOU!!! 

8270 ; 

8230 LDA LIMES ;IF DEAD, DON'T KILL 

3290 BEQ NOPCOL 

8300 ; 

3310 LDA PLAYE jMAKE SURE NOT ALREADY 

3320 BNE NOPCOL :IN EXPLOSION 

8330 ; 

8340 DEC LIMES 

8350 ; 

3360 ' LDMEM #$C0,PLAYE ;START EXPLODE 

8370 LDMEM #$13,PLAYP ;POINT AT EXPLOSION 

3380 LDMEM #$30,SNDTM1 

8390 LDMEM #$80,M1CORG ?RESET CHANNEL 

3400 LDMEM #$1A,S1ATDC 

8410 LDMEM #$81,S1C0RG 

8420 ADRES EN5,S1FRL0 ;HIGH EXPLOSION 

8430 ; 

8440 ; 

8450 ; 

3460 NOPCOL ANOP 
8470 s 
3480 ; 

3490 s 

8500 5 LAUNCH SHOTS NEXT 
8510 ; 

3520 LDA SCREEN 

8530 AND #$03 

3540 BNE NOLNCH 

3550 ; 

8560 5 TRY TO LAUNCH A SHOT 
8570 ; 

3580 LDX #$00 

8590 LDA SHOTS sONE SHOT IN THE AIR 

8600 NOT ;AT ANY ONE TIME 

3610 LSR A 

8620 AND WHOLIM ;ONLY LIME BAD GUYS 

8630 STA BUF 5 CAN SHOOT 

3640 ; 

8650 LCHIT1 ROR BUF 

8660 BCC LCHIT2 

8670 ; 

8680 LDY LEMEL 

8690 LDA FIRPOW,Y 

8700 CMP RAND2 ;IF RANDOM #<FIRPOW—SHOOT 

8710 BCC NOLNCH 

8720 j 

8730 LDA MEANE,X 

8740 BNE LCHIT2 

8750 ; 

8760 ; 

8770 ;FI RE IF HERE 
8730 : 

3790 LDA SHOTS 

8880 ORA BITPOS+ 1,X 
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3318 

STA SHOTS 


3828 

5 


8838 

LDA MEANV.X 


8848 

CLC 


8358 

ADC #*03 

:ADD AN OFFSET 

8880 

STA SHOTSU+1,X 


8370 

: 


8888 

LDA MEANH,X 


3390 

STA SHOTSH+1,X 


8900 

• 


8910 

LDA RANDS 

SPICK A RANDOM DIRECTION 

8920 

AND #*03 

sFOR THE SHOT 

3930 

TAY 


8940 

LDA SHTDR.Y 


8950 

STA SHOTSD+l.X 


3980 

STX BUFi 

:PUT X IN TEMP REGISTER 

8970 

LDA SHOTSH+1.X 


3980 

STA XPNT 


8990 

LDA SHOTSV+l.X 


9000 

STA YPNT 


90 1 0 

JSR XPLOT 

:PLOT THE SHOT 

9020 



90 30 



9840 



98 50 

•PUT SOUND HERE 


9080 



9070 



9080 

ADRES EN4,S2FRL0 

98 90 

TXA 

8 GET BAD GUY NUMBER 

9100 

CLC 

8 PREPARE TO ADD 

91 10 

ADC S2FRHI 

5HIGHER TONE FOR 

9120 

STA S2FRHI 

sHIGHER NUMBER 

9130 

5 


9140 

LDMEM #$20,V2C0RG ;SAWTOOTH WAVE 

9158 

LDMEM #$09,S2ATDC 

9180 

LDMEM #$00,S2SURL 

9170 

LDMEM #$21,S2C0RG 

9180 

LDMEM #$14,SNDTM2 

9190 

JMP NOLNCH 


9200 

J 


9210 

;ONCE A SHOT HAS BEEN 

ENABLED 

9220 

;IT IS MOVED AUTOMATICALLY 

9230 

;BY THE MOVE SHOT ROUTINE 

9240 

s 


9250 

LCHIT2 INX 


9280 

CPX #*07 


9270 

BNE LCHIT1 


9280 

; 


9290 

NOLNCH ANOP 


9300 

5 


9310 

5 


9320 

5 


9330 

9 


9340 

5UNPLOT THE SHOTS, THEN MOVE 

9350 

5 


9380 

> 


9370 

LDA SCREEN 


9380 

AND #*01 


9390 

JEQ NSHT0 





9400 LDMEM #*03,COLOR 

9410 LDX #*01 

9420 STX LPCNT1 

9430 : 

9440 LDMEM SHOTS.BUF 


9450 


ROR 

BUF 

9460 

■ 



9470 

MYSHT0 

ANOP 

9480 


LDX 

LPCNT1 

9490 


ROR 

BUF 

9500 


BCC 

MYSHT4 

9510 

: 



9520 


LDA 

SHQTSH,X 

9530 


STA 

XPNT 

9540 


LDA 

SHOTSC 1 ,X 

9550 


STA 

YPNT 

9560 

; 



9570 


JSR 

XPLOT 

9580 

s 



9590 


LDX 

LPCNT1 

9600 

s 



9610 


LDY 

LEYEL 

9620 

: 



9630 


LDA 

SHOTSD.X 

9640 


STA 

BUF 1 

9650 


ROR 

BUF 1 

9660 


BCC 

MYSHT1 

9670 

5 



9680 


LDA 

SHOT SC*, X 

9690 


CLC 


9700 


SBC 

SPEEDY,Y 

9710 


STA 

SHOTSY,X 

9720 

5 



9730 

MYSHT1 

ROR 

BUF 1 

9740 


BCC 

MYSHT2 

9750 

: 



9760 


LDA 

SHOTSY,X 

9770 


SEC 


9780 


ADC 

SPEEDY,Y 

9790 


STA 

SHOTSY,X 

9800 

; 



9310 

MYSHT2 

ROR 

BUF 1 

9820 


BCC 

MYSHT3 

9830 

: 



9840 


LDA 

SHOTSH.X 

9350 


CLC 


9860 


SBC 

SPEEDH.Y 

9870 


STA 

SHOTSH,X 

9880 

5 



9890 

MYSHT3 

ANOP 

9900 

; 



9910 

:PREPARE TO PLOT 

9920 

■l 



9930 


LDA 

SHOTSH.X 

9940 


STA 

XPNT 

9950 


LDA 

SHOTSY.X 

9960 


STA 

YPNT 

9970 

: 



9980 


JSR 

XPLOT 


:SEE IF SHOT IN FLIGHT 


•, UNPLOT THE POINT 


;MOYE UP 

; ADD IN ONE TO SPEED 
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9990 : 

10000 MVSHT4 ANOP 


10010 : 

10020 

INC 

LPCNT1 

10030 

LDA 

LPCNT1 

10040 

CMP 

#$08 

10050 

JNE 

MUSHT0 

10060 ? 

10070 NSHT0 

ANOP 


10080 

5 




10090 

:MOVE 1 

3 LAYER SHOT 


10100 

5 




10110 


LDA 

SHOTS 


10 120 


AND 

#$01 


10130 


BEQ 

NSHT1 

:IF SHOT IS INFLIGHT 

10140 

I 




10150 


INC 

SHOTSH 

;MOL>E SHOT TO RIGHT 

10160 


INC 

SHOTSH 


10170 

5 




10180 

NSHT1 

ANOP 


10190 

; 




10200 

• 




10210 

•CHECK 

TO SEE IF THE 

SHOTS HAL»E 

10220 

: REACHED THE EDGE—CANCEL SHOT 

10230 

;WHEN 

EDGE 

IS REACHED 

10240 

s 




10250 

•CHECK 

PLAYER'S SHOT 

FIRST 

10260 

: 




10270 


LDA 

SHOTS 


10230 


AND 

#$01 

:IS PLAYER SHOT ACTIVE? 

10290 


BEQ 

NSHT2 


10300 

: 




10310 


LDA 

SHOTSH 


10320 


CMP 

#$A0 

:RIGHT EDGE OF SCREEN 

10330 


BCC 

NSHT2 


10 340 

s 




10 350 


LDA 

SHOTS 

:CLEAR SHOT ENABLE BIT 

10360 


AND 

#$FE 


10370 


STA 

SHOTS 


10330 

: 




10390 

NSHT2 

ANOP 


10400 

• 




10410 

•CHECK 

THE 

BAD GUYS 

SHOTS 

10420 

! 




10 430 


LDX 

#$01 


10440 

NSHT3 

LDA 

SHOTSH.X 


10450 


CMP 

#$0C 

;LEFT SIDE 

10460 


BCS 

NSHT4 

:NOT THERE YET 

10470 

5 




10480 


JMP 

CLRSHT 

5 UNPLOT AND CLEAR ENABLE 

10490 

; 




10500 

NSHT4 

LDA 

SHOTSL 1 ,X 


1.0510 


CMP 

#$F4 


10520 


BCC 

NSHT5 


10530 

5 




10540 


JMP 

CLRSHT 


10550 

: 




10560 

NSHT5 

CMP 

#$50 

:ADJUST LATER- 

10570 


BCS 

NSHT6 




10 580 
10590 
10600 
10610 
10620 
10630 
10640 
10650 
10660 
10670 
10680 
10690 
10700 
10710 
10720 
10730 
10740 
10 750 
10760 
10770 
10780 
10790 
10800 
10810 
10320 
10830 
10340 
10850 
10360 
10370 
10330 
10390 
10900 
10910 
10920 
10 930 
10940 
10 950 
10960 
10 970 
10980 
10990 
11000 
11010 
11020 
11030 
11040 
11050 
11060 
11070 
11030 
11090 
11100 
11110 
11120 
11130 
11140 
11150 
11160 


CLRSHT LDA SHOTS 

AND ANDPGS,X 
STA SHOTS 


jUNPLOT THE SHOT 

STX BUF 
LDA SHOTSH,X 
STA XPNT 
LDA SHOTSV,X 
STA YPNT 

j 

JSR XPLOT 

LDX BUF 

NSHT6 ANQP 
I NX 

CPX #$08 
BNE NSHT3 


; SAME X REGISTER 

; UNPLOT THE POINT 
; GET THE X BACK 


:ANIMATE SPRITES NEXT 
5ALL SPRITES USE A FOUR SPRITE 
;ANIMATI ON SEQUENCE. 4/SECOND 


ANSP0 


j 


NOAN1 


LDA 

SCREEN 

AND 

#$07 

CMP 

#$06 

BNE 

NOAN1 

LDX 

#$0 0 

ANOP 

LDA 

PLAYP.X 

AND 

#$03 

TAY 


LDA 

PLAYP.X 

AND 

#$FC 

STA 

BUF 

I NY 


TYA 


AND 

#$03 

ORA 

BUF 

STA 

PLAYP,X 

I NX 


CPX 

#$03 

BNE 

ANSP0 

ANOP 

LDA 

SCREEN 


i DO IT EVERY 15'TH 
;SCREEN 
: BYPASS CODE 


; SPRITE POINTER 
: STRIP LOWER 3 BITS 

; CLEAR 2 LSB'S 

; CLEAR OVERFLOW 
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11170 

AND 

#*0F 

11180 

BNE 

NGLV 

11190 

ADRES *40C0,BUF 

11200 : 



11210 

LDA 

LIMES 

11220 

ASL 

A 

11230 

TAY 


11240 

LDA 

NUMBER,Y 

11250 

STA 

BUF+2 

11260 

LDA 

NUMBER+1,Y 

11270 

STA 

BUF+3 

11230 

LDY 

#*00 

11290 LIMLP 

LDA 

< BUF+2),Y 

11300 

STA 

(BUF>,Y 

11310 

INY 


11320 

CPY 

#*10 

11330 

BNE 

LIMLP 


11340 : 

11350 NOLM ANOP 

11360 ; 

11370 ,• 

11380 5 
11390 ; 

11400 ; 

11410 ; 

11420 ; 

11430 STLUD LDA JGY2 

11440 AND #*10 

11450 JEQ TOP 

11460 : 

11470 ; 

11430 : 

11490 ; 

11500 : 


; RESET 


11510 
11520 
11530 
11540 
11550 
11560 
11570 
11580 
11590 
11600 
11610 
11 620 
11 630 
11640 
11 650 
1 1 660 
11670 
1 1 680 
11696 
11700 
11710 
11720 
11730 
11740 
11 750 


TUI ID 


I NT© 


SYNC1 


LDMEM #*00 f ENABLE 
LDA ENABLE 
BEQ TWID 
JMP START 


ANOP 

LDA SSCOL : 

STA TMSCGL i 

LDA SBCOL ; 

STA TMBCOL $ 

LDMEM #BLUE.BCOL0 
INC SCREEN 
INC RANSEC 
LDA RANSEC 
EOR #*3C 
BNE SYNC1 


GET SPRITE COLLISIONS 
PUT IN TEMP REGISTER 
SPRITE—BACKGROUND 
COLLISIONS 


STA RANSEC 
INC SECOND 
ANOP 




11760 

; 



11770 


LDX 

#*00 

1 1 780 


STX 

HMSB 

11 790 


LDY 

#*00 

11300 

SHAD1 

ANOP 

11810 


LDA 

MQUNTV ,X 

11820 


STA 

SPR0Y,Y 

11 830 


LDA 

MOUNTP,X 

11340 


STA 

3PRPT1,X 

11850 


LDA 

MOUNTH,X 

11360 


STA 

SPR0X.Y 

11 870 


LDA 

MOUNTC,X 

11380 


STA 

3PRCL0,X 

1 1 890 

5 



11900 




11910 

SHAD2 

I NY 


11920 


I NY 


11 930 


I NX 


11940 


CPX 

#*08 

11950 


BNE 

SHAD1 

11960 

; 



11970 


LDA 

MNTMSB 

11980 


STA 

XMSB 

11990 

5 



12000 


LDMEM #*00 ,MLTSP 

12010 

5 



12020 


LDMEM #*FF,SPRXS2 

12030 


STA 

SPRYS2 

12040 


STA 

SPREN 

12050 

j 



12060 


LDA 

PLAYE 

12070 


BEQ 

TM0 

12030 


DEC 

PLAYE 

12090 


LDA 

PLAYE 

12100 


BNE 

TM0 

12110 


LDMEM #*14,PLAYP 

12120 

: 



12130 

TM0 

LDA 

SNDTM1 

12140 


BEQ 

TM1 

12150 


DEC 

SNDTM1 

12160 


BNE 

TM1 

12170 

5 



12180 


LDA 

S1CORG 

12190 


AND 

#*FE 

12200 


STA 

S1CORG 

12210 

y 



12220 

TM1 

LDA 

SNDTM2 

12230 


BEQ 

TM2 

12240 


DEC 

3NDTM2 

12250 


BNE 

TM2 

12260 

: 



12270 


LDA 

S2C0RG 
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AND 

#*FE 

12290 


STA 

S2C0RG 

12300 

I 



12310 

TM2 

LDA 

SNDTM3 

12320 


BEQ 

TM3 

12330 


DEC 

SNDTM3 

12340 


BNE 

TM3 
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12350 
12360 
12370 
1 2330 
12390 
12400 
12410 
12420 
12430 
12440 
12450 
12460 
12470 
12480 
12490 
12500 
12510 
12520 
12530 
12540 
12550 
12560 
12570 
12530 
12590 
12600 
12610 
12620 
12630 
12640 
12650 
12660 
12670 
12630 
12690 
12700 
12710 
12720 
12730 
12740 
12750 
12760 
12770 
12780 
12790 
12300 
12810 
12820 
12830 
12340 
12850 
12860 
12870 
12880 
12890 
12900 
12910 
12920 
12930 


TM3 ANOP 


:SHADOW SID CHIP 

LDMEM S1ATDC.V1ATDC 
LDMEM S2ATDC.V2ATDC 
LDMEM 83ATDC ,V3ATDC 
LDMEM 81SURL, VI SURL 
LDMEM S2SURL,V2SURL 
LDMEM S3SURL,V3SURL 
LDMEM SIFRLO,VIFRLO 
LDMEM S2FRLQ.V2FRL0 
LDMEM S3FRL0,V3FRL0 
LDMEM S1FRHI,V1FRHI 
LDMEM S2FRHI,V2FRHI 
LDMEM S3FRHI.V3FRHI 
LDMEM S1PWLG,V1PWL0 
LDMEM S2PWLG.V2PWLG 
LDMEM S3PWL0 ,V3PWLQ 
LDMEM S1PWHI.V1PWHI 
LDMEM S2PWHI ,V2PWHI 
LDMEM S3PWHI .V3PWHI 
LDMEM FILLO,FLCNLQ 
LDMEM FILHI,FLCNHI 
LDMEM MMODjMODVOL 
LDMEM RFIL,RESFLT 
LDMEM S1C0RG,V1C0RG 
LDMEM S2C0RG,V2C0RG 
LDMEM S3C0RG,V3C0RG 


-.GENERATE A RANDOM NUMBER 


; USE RAND1-RAND4 BASED 


LDA 

SCREEN 

AND 

#$03 

TAX 


LDA 

RANDOM 

ADC 

RAND1 

ADC 

RAND 3 

EOR 

RAND 2 

SBC 

RAND 4 

ADC 

RANSEC 

STA 

RAND1.X 


:MGVE THE PLAYER USING 

LDA LIVES 
JEQ N0M0V4 

LDA PLAYE 
JNE NQMQV4 


AN SCREEN 


;POINT TO A RAND REGISTER 
:THE FOLLOWING 
•SEQUENCE THROWS 
: A NUMBER OF RANDOM 
;NUMBERS TOGETHER 
:TO FORM A NEW RANDOM 
;NUMBER 


JOY 1 

:SEE IF GAME OVER 
:DON'T MOVE IF OVER 

;DON'T MOVE IF EXPLODING 
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1 2940 

LDA JOY1 


12950 

NOT 

:TURN THE BITS OVER 

1 2960 

STA IBUF+1 

:PUT THE DATA AWAY 

12970 

AND #$0F 

:CHECK TO SEE IF THE 

1 2980 

BEQ N0M0M3 

5 BRANCH IF NOT 

12990 : 



1 3000 

LDA SCREEN 

;SLOW MOVEMENT BY 

1 30 1 0 

AND 4*0i 

:MOVING ON ALTERNATE 

13020 

BNE N0M0M3 

;SCREENS 

13030 : 



13940 :IF HERE-HOME CHARACTER 

13050 i 



13S60 

LDMEM IBUF+1 

»IBUF ;COPY JOY TO BUF 

130 70 

ROR IBUF 

:CHECK FIRST BIT 

13080 

BCC NXBIT1 

:IF CARRY CLEAR-JUMP 

13090 : 



13100 

LDA PLAYV 


13110 

SEC 


13120 

SBC #*01 


13130 

CMP #*68 

:CHECK FOR TOP 

13140 

BCC NXBIT1 


13150 : 



13160 

STA PLAYV 


13170 ; 



13180 NXBIT1 

ROR IBUF 


13190 

BCC NXBIT2 


13200 : 



13210 

LDA PLAYV 


13220 

CLC 


1 3230 

ADC #*01 


13240 

CMP #*E8 

5 CHECK FOR BOTTOM 

13250 

BCS NXBIT2 


13260 ; 



13270 

STA PLAYV 


13280 ; 



13290 NXBIT2 

ROR IBUF 


13300 

BCC NXBIT3 

;MOVE LEFT 

13310 $ 



13320 

LDA PLAYH 


13330 

SEC 


13340 

SBC #*01 


13350 

CMP #*10 


13360 

BCC NXBIT3 


13370 : 



13380 

STA PLAYH 


13390 i 



13400 NXBIT3 

ROR IBUF 


13410 

BCC N0M0V3 

;MOVE RIGHT 

13420 ; 



13430 

LDA PLAYH 


13440 

CLC 


13450 

ADC #*01 


13460 

CMP #*30 


13470 

BCS N0MGV3 


13480 : 



13490 

STA PLAYH 


1350 0 ; 



13510 N0M0V3 

LDA JOY1 


13520 

AND #*10 

;CHECK FIRE BUTTON 
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13530 

BNE 

NQM0V4 

:NOT PRESSED—BRANCH 

13540 

1 



13550 

LDA 

SHOTS 

;SHOT INFLIGHT? 

13560 

AND 

#*01 

!PLAYER SHOT 

13570 

BNE 

NQMQV4 

:IF NOT—FIRE_ 

13530 

: 



13590 

• 



1 360 0 

LDA 

PLATE 


13610 

BNE 

NQM0V4 


13620 

: 



13630 

LDA 

SHOTS 

;SET SHOT IN FLIGHT ! 

13640 

ORA 

#*01 

:FOR THE PLAYER 

13650 

STA 

SHOTS 


I 3660 

: 



13670 

5 SET SHOT 5 

START POS 

ITI ON TO GUN 

13680 

: 



13690 

LDA 

PLAYH 


13700 

CLC 



13710 

ADC 

#*05 

;ADD OFFSET TO SHOT 

13720 

STA 

SHOTSH 


13730 

: 



13740 

LDA 

PLAYV 


13750 

CLC 



13760 

ADC 

#*07 

:ADD VERTICLE OFFSET 


13770 STA SHOTSV 

13780 : 

13790 LDMEM #*08,SHOTSD ;SHOT DIRECTION 

13800 LDMEM #*81.S1C0R6 

13810 LDMEM #*20,SNDTM1 

13820 ADRES CN3,S1FRLG 

13830 LDMEM #*28,S1ATDC 

13840 : 

13850 ;SHOT STARTED 
13860 : 

13870 N0M0M4 ANOP 
13880 : 

13890 : 

13900 : 

13910 ; 

13920 ADRES INTI.CINV 

13930 LDMEM #*01,ENABLE 

13940 RAST #*54 

13950 I PULL 

13960 ; 

13970 ; 

13980 s 

13990 INTI SEI 
14000 : 

14010 LDA SSCOL 5 CLEAR COLLISIONS 

14020 LDA SBCOL 

14030 : 

14040 NOP 

14050 NOP 

14060 NOP 

14070 ; 

14080 : 

14090 LDMEM #6REEN,BCQL0 

14100 : 

14110 LDX #*00 
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14120 


STX 

HMSB 


14130 


LDY 

#*00 


14140 

SHAD3 

ANOP 


14150 


LDA 

F’LAYV.X 


14160 


STA 

SPR0Y.Y 


14170 


LDA 

PLAYP.X 


14180 


STA 

SPRPT1.X 


14190 


LDA 

PLAYH,X 


14200 


ASL 

A 


14210 


STA 

SPR6X.Y 


14220 


BCC 

SHAD4 


14230 


LDA 

HMSB 


14240 


ORA 

BITPOS.X 


14250 


STA 

HMSB 


14260 

SHAD4 

INY 



14270 


I NY 



14230 


I NX 



14290 


CPX 

#*08 


14300 


BNE 

SHAD 3 


14310 

: 




14320 

: 




14330 


LDA 

HMSB 


14340 


STA 

XMSB 


14350 

• 




14360 

iMULTI FLEX 

PLAYER AND HIS SHOT 

14370 

:THE PLAYER IS ALREADY 

UP 

14380 

: 




14390 


LDA 

SCREEN 

•.SHOT ON ODD SCREENS 

14400 


AND 

#*01 


14410 


BEQ 

NOMLT 


14420 

! 




14430 


LDA 

SHOTS 

:SEE IF SHOT ACTIVE 

14440 


AND 

#*01 

:IF NOT ACTIVE-FGRGET 

14450 


BEQ 

NOMLT 


14460 





14470 

; SHOT 

ACTIVE IF HERE 


14430 





14490 


LDA 

#*1C 


14500 


STA 

SPRPT1 


14510 


LDA 

SHGTSV 

:GET SHOT VERTICAL 

14520 


STA 

SPR0Y 

:STORE IN SPRITE 0 

14530 


LDA 

SHOTSH 

;GET SHOT HORIZONTAL 

14540 


ASL 

A 

sMULTI PLY BY 2 

14550 


STA 

SPR0X 

;PUT IN VIC CHIP 

14560 


LDA 

XMSB 

$GET MSB 

14570 


AND 

#*FE 

;CLEAR MSB 

14530 


STA 

XMSB 

sREPLACE IT 

14590 


BCC 

NOMLT 

;GO HOME IF MSB CLEAR 

14600 

: 




14610 


ORA 

#*01 

;SET MSB IF HERE 

14620 


STA 

XMSB 


14630 

5 




14640 

NOMLT 

ANOP 

MULTIPLEXING DONE 

14650 

5 




14660 

5 




14670 


LDMEM #*00 .SPRXSZ :SET SPRITE SIZE 

14680 


STA 

SPRYSZ 

5TO SMALL 

14690 

5 




14700 


LDMEM #*FF,MLTSP 

jMULTI COLOR SPRITES 
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14710 
14728 
14730 
14740 
14750 
14760 
14770 
14780 
14790 
14800 
14810 
14820 
14830 
14840 
14850 
I486© 
14870 
14880 
14890 
14900 
14910 
14920 
14930 
14940 
14950 
14960 
14970 
14980 
14990 
15000 
15010 
15020 
150 30 
15040 
15050 
15060 
15070 
15080 
15090 
15100 
15110 
15120 
15130 
15140 
15150 
15160 
15170 
15180 
15190 
15200 
15210 
15220 
15230 
15240 
15250 
15260 
15270 
15280 
15290 


LDA WHOLIV ;ENABLE THE LIVE BAD GUYS 

ASL A 

ORA #*01 ;ENABLE PLAYER ALWAYS 

STA SPREN :TURN SPRITES BACK ON 


;THE MOUNTAINS ARE UP 
;SO THEY CAN NOW BE MOVED 

LDX #*00 

LDMEM MNTMSB,HMSB 
MVMNT0 HDEC MQUNTH 
I NX 

CPX #*08 
BNE MVMNT0 


LDMEM HMSB,MNTMSB 


jMOUNTAINS HAVE BEEN MOVED ONE 

: PIXEL TO THE LEFT 

sTHEY MUST NOW BE ADJUSTED FOR 

: A WRAPAROUND EFFECT TO APPEAR 

•CONTINUOUS 


LDX #*00 
MVMNT1 ANOP 

PUNPCK MOUNTH.MNTMSB,IBUF 

LDA IBUF+1 

CMP #*01 

BNE MVMNT2 

LDA IBUF 

CMP #*E3 

BNE MVMNT2 


MOUNTAIN SECTION AT 0— MOVE IT 
TO *0170 

LDA MNTMSB 
ORA BITPOS,X 
STA MNTMSB 
LDA #*70 
STA MOUNTH.X 


MVMNT2 INX :DO THE NEXT SECTION 

CPX #*08 
BNE MVMNT1 


THE MOUNTAINS ARE FINISHED 


LDX #*00 

EXPLP1 LDA MEANE.X 
BEQ EXPLP2 
DEC MEANE.X 
BNE EXPLP2 


;DECREMENT EXPLOSION COUNTERS 






15300 
15310 
15320 
15330 
15340 
15350 
15360 
15370 
15380 
15390 
1 540 0 
15410 
15420 
15430 
15440 
15450 
15460 
15470 
15480 
15490 
15500 
15510 
15520 
1 5530 
15540 
1 5550 
1 5560 
15570 
15580 
15590 
15600 
15610 
15620 
15630 
15640 
15650 
1 5660 
1 5670 
15680 
15690 
15700 
15710 
15720 
1 5730 
15740 
15750 
15760 
15770 
15780 
15790 
1580 0 
15818 
15820 
15830 
15840 
1 5850 
15860 
15870 
1 5880 
15890 


LDA WHOLIU 

AND ANDROS,X ;CLEAR BIT FROM WHOLIU 
STA WHOLIU 

EXPLP2 INX 

CPX #$07 
BNE EXPLP1 


ADRES INT0.CINV 
RAST #$FB 
I PULL 


UP ANOP 

LDA MEANU.Y 
SEC 

SBC UERNC 

CMP #$68 :UNDER MOUNTAINS 

BCC UP1 
STA MEANU.Y 
UP1 RTS 

DN ANOP 

LDA MEANU.Y 
CLC 

ADC UERNC 
CMP #$E8 
BCS DWN1 
STA MEANU.Y 
DWN1 RTS 

LT ANOP 

LDA MEANH.Y 
SEC 

SBC HORNC 
CMP #$0E 
BCC LT1 
STA MEANH.Y 
LT1 RTS 

RT ANOP 

LDA MEANH.Y 
CLC 

ADC HORNC 
CMP #$A9 
BCS RT1 
STA MEANH.Y 
RT1 RTS 


.OPT LIST 
NOP 

. END 
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Listing C-25: The B0GH0P.0 Program 


B* 










1198 

83 

84 

85 

86 

87 

C0 

Cl 

C2 


PC 

SR 

AC 

XR 

YR 

SP 





1 1A0 

C3 

C4 

C5 

C6 

C7 

00 

01 

02 

• 

; C03E 

32 

00 

C3 

00 

F6 





11A8 

03 

04 

05 

06 

07 

40 

41 

42 

• 











11 B0 

43 

44 

45 

46 

47 

80 

81 

82 












11 B8 

83 

84 

85 

86 

87 

C0 

Cl 

C2 


1000 










1 1C0 

C3 

C4 

C5 

C6 

C7 

00 

01 

02 


28 

43 

29 

20 

43 

4F 

50 

59 


11C8 

03 

04 

05 

06 

07 

40 

41 

42 


1003 

52 

49 

47 

48 

54 

20 

31 

39 


11D0 

43 

44 

45 

46 

47 

80 

81 

82 


1010 

38 

34 

2C 

20 

53 

54 

45 

56 


11D3 

33 

84 

85 

86 

87 

C0 

Cl 

C2 


1018 

45 

4E 

20 

42 

52 

45 

53 

53 


11E0 

C3 

C4 

C5 

C6 
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AB 

A0 

2A 

AA 

A0 

0A 

AB 

A0 


48C0 

10 

00 

00 

38 

00 

00 

7C 

00 

46F0 

0A 

2A 

A0 

00 

8A 

A0 

00 

AA 


43C8 

00 

FE 

00 

00 

FF 

00 

00 

FF 

46F8 

80 

00 

2A 

86 

00 

00 

00 

60 


48D0 

80 

00 

FF 

C0 

00 

FF 

E0 

00 

4700 

18 

00 

00 

A5 

00 

00 

28 

00 


43D8 

FF 

F0 

00 

FF 

F8 

00 

FF 

F8 

4708 

00 

00 

00 

00 

00 

00 

00 

00 


48E0 

00 

7F 

FC 

00 

BF 

FE 

00 

DF 

4710 

00 

00 

00 

00 

00 

00 

00 

00 


48E8 

FF 

00 

EF 

FF 

80 

EF 

FF 

C0 

4718 

00 

00 

00 

00 

00 

00 

00 

00 


48F0 

F7 

FF 

E0 

FB 

FF 

F8 

FB 

FF 

4720 

00 

00 

00 

00 

00 

00 

00 

00 


48F8 

FE 

FD 

FF 

FF 

FE 

FF 

FF 

00 

4728 

00 

00 

00 

00 

00 

00 

00 

00 


4900 

18 

00 

00 

08 

00 

00 

08 

00 

4730 

00 

00 

00 

00 

00 

00 

00 

00 


4963 

00 

63 

00 

00 

0E 

00 

00 

0E 

4738 

00 

00 

00 

00 

00 

00 

00 

00 


4910 

00 

00 

0E 

00 

00 

FF 

F0 

00 

4740 

28 

00 

00 

6A 

00 

00 

13 

00 


4918 

F3 

E6 

00 

75 

C0 

00 

73 

00 

4746 

00 

00 

00 

00 

00 

00 

00 

00 


4926 

00 

3E 

66 

00 

00 

00 

00 

00 

4750 

00 

00 

00 

00 

00 

00 

00 

00 


4928 

00 

00 

00 

00 

00 

00 

00 

00 

4758 

00 

00 

00 

00 

00 

00 

00 

00 


4930 

00 

00 

00 

00 

00 

00 

00 

00 

4760 

00 

00 

00 

00 

00 

00 

00 

00 


4938 

00 

00 

00 

00 

00 

00 

00 

00 

4768 

00 

00 

00 

00 

00 

00 

00 

00 


4946 

00 

10 

00 

00 

78 

00 

00 

F8 

4770 

00 

00 

00 

00 

00 

00 

06 

00 


4948 

00 

03 

FC 

00 

07 

FE 

00 

07 

4778 

00 

00 

00 

00 

00 

00 

00 

00 


4956 

FF 

00 

0F 

FF 

00 

6F 

FF 

86 

4780 

27 

00 

00 

5A 

00 

00 

28 

00 


4953 

IF 

FF 

C0 

IF 

FF 

C0 

3F 

FF 

4738 

00 

00 

00 

06 

00 

00 

00 

00 


4960 

E6 

3F 

FF 

E6 

3F 

FF 

E6 

7F 

4790 

00 

00 

00 

00 

06 

00 

00 

00 


4968 

FF 

E0 

7F 

FF 

E0 

FF 

FF 

F6 

4798 

00 

00 

00 

00 

00 

00 

00 

00 


4970 

FF 

FF 

F3 

FF 

FF 

F8 

FF 

FF 

47A0 

00 

00 

00 

00 

00 

00 

00 

00 


4978 

F8 

FF 

FF 

FC 

FF 

FF 

FC 

00 

47A8 

00 

00 

60 

00 

00 

00 

00 

00 


4986 

04 

00 

00 

0E 

00 

00 

6F 

00 

47B0 

00 

00 

00 

00 

00 

00 

00 

00 


4988 

00 

IF 

86 

00 

3F 

30 

00 

37 

47B8 

00 

00 

00 

00 

0 0 

00 

00 

00 


4990 

C0 

00 

6F 

E0 

00 

EB 

76 

00 

47C0 

28 

00 

00 

A5 

00 

00 

27 

00 


4993 

F7 

B0 

00 

EF 

F0 

00 

FF 

F0 

47C8 

00 

00 

00 

00 

00 

06 

00 

00 


49A0 

00 

00 

00 

00 

00 

00 

00 

00 

47D0 

00 

00 

00 

00 

00 

00 

00 

00 


49A3 

00 

00 

00 

00 

00 

00 

00 

00 

47D8 

00 

00 

00 

00 

00 

00 

60 

00 


49B6 

00 

00 

00 

00 

00 

00 

00 

00 

47E0 

00 

00 

0 0 

00 

00 

00 

00 

00 


49BS 

00 

00 

00 

00 

00 

00 

00 

00 

47E3 

00 

00 

00 

00 

00 

00 

00 

00 


49C0 

IB 

00 

00 

68 

06 

00 

18 

00 

47F0 

00 

00 

00 

0 0 

00 

00 

00 

00 


49C3 

00 

3C 

00 

60 

C2 

00 

00 

C2 

47F3 

00 

00 

00 

00 

00 

00 

00 

00 


49D0 

00 

00 

3C 

00 

00 

13 

00 

00 

4800 

00 

00 

01 

00 

00 

03 

00 

00 


49D3 

03 

00 

00 

13 

00 

00 

00 

00 

430 8 

07 

00 

00 

0F 

00 

00 

IF 

00 


49E0 

00 

00 

00 

00 

00 

00 

00 

00 

4310 

00 

IF 

00 

00 

7F 

00 

03 

7E 


49E8 

00 

00 

00 

00 

00 

00 

00 

00 

4318 

00 

07 

FD 

00 

6F 

BB 

00 

FF 


49F0 

00 

00 

00 

00 

00 

00 

00 

00 

4820 

B7 

01 

FF 

EF 

03 

FF 

F7 

63 


49F8 

00 

00 

00 

00 

00 

00 

00 

00 

4823 

FF 

FB 

07 

FF 

0D 

0 F 

FF 

FE 


4A0 0 

0C 

00 

00 

08 

00 

00 

18 

00 

4830 

IF 

FF 

FF 

3F 

FF 

FF 

7F 

FF 


4A0 8 

00 

3C 

00 

00 

C2 

00 

00 

C2 

4833 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

00 


4A10 

00 

00 

3C 

00 

00 

18 

00 

00 

4840 

80 

00 

00 

C0 

00 

00 

E8 

80 


4A18 

A8 

00 

00 

58 

00 

00 

00 

00 

4848 

00 

FD 

C0 

00 

DF 

E0 

00 

BF 


4A20 

0 0 

00 

00 

00 

60 

00 

00 

00 

4850 

FI 

00 

7F 

FB 

86 

FF 

FF 

C6 


4A28 

00 

00 

00 

00 

00 

00 

00 

00 

4858 

FF 

FF 

E0 

FF 

FF 

F6 

FF 

FF 


4A36 

0 0 

00 

00 

60 

00 

00 

00 

00 





.:4A38 00 00 00 00 00 00 00 00 
.:4A40 5? 00 00 49 00 00 2A 00 
.:4A48 00 3E 00 00 2A 00 08 49 
.:4A50 00 00 49 00 00 14 00 00 
.:4A58 00 00 00 00 00 00 00 00 
.:4A60 00 00 00 00 00 00 00 00 
.:4A68 00 00 00 00 00 00 00 00 
.:4A70 00 00 00 00 00 00 00 00 
.:4A7S 00 00 00 00 00 00 00 00 
•:4A80 0C 00 00 6B 00 00 2A 00 
.:4A38 00 7F 00 00 49 00 00 2A 
.:4A90 00 00 6B 00 00 14 00 00 
.:4A98 00 00 00 00 00 00 00 00 
.:4AA0 00 00 00 00 00 00 00 00 
.:4AA3 00 00 00 00 00 00 00 00 
•:4AB0 00 00 00 00 00 00 00 00 
.:4AB8 00 00 00 00 00 00 00 00 
-:4AC0 0C 00 00 2A 00 00 2A 00 
.s4AC8 00 7F 00 00 2A 00 00 2A 
.:4AD0 00 00 2A 00 00 14 00 00 
. S 4AD8 00 00 00 00 00 00 00 00 
.:4AE0 00 00 00 00 00 00 00 00 
•:4AE8 00 00 00 00 00 00 00 00 
.:4AF0 00 00 00 00 00 00 00 00 
.:4AF8 00 00 00 00 00 00 00 00 
-:4B00 18 00 00 08 00 00 2A 00 
•:4B08 00 3E 00 00 2A 00 08 00 
-:4B10 00 08 00 00 14 00 00 00 
.S4B18 00 00 00 00 00 00 00 00 


Listing C-26: The BOGDEF Source Code 

1000 ;PUT"30:BOGDEF" 

1010 ;GET"CAST" 

1020 ; 

1030 ; 

1040 ;BOG HOP RAM DEFINITIONS 
1050 ;BOGDEF 
1060 ; 

1070 ;LOCATIONS 0 & 1 ARE HARDWARE 
1030 ;SO USABLE RAM STARTS AT *02 
1090 ; 

1100 * = *02 

1110 S1C0R6 DS 1 ;SID CHIP SHADOW 

1120 S2C0RG DS 1 sREGISTERS 

1136 S3C0RG DS 1 

1140 S1FRLO DS 1 

1150 S1FRHI DS 1 

1160 S2FRL0 DS 1 

1170 S2FRHI DS 1 

1180 S3FRL0 DS 1 

1190 S3FRHI DS 1 

1200 SIPWLO DS 1 

1210 S1PWHI DS 1 

1220 S2PWL0 DS 1 

1230 S2PWHI DS 1 

1240 S3PWL0 DS 1 

1250 S3PWHI DS 1 


.:4B20 00 00 00 00 00 00 00 00 
.:4B2S 00 00 00 00 00 00 00 00 
.:4B30 00 00 00 00 0000 00 00 
.;4B38 00 00 00 00 00 00 00 00 
.:4B40 0C 00 00 6B 00 00 2A 00 
.:4B43 00 7F 00 00 49 00 00 2A 
•:4B50 00 00 6B 00 00 14 00 00 
.:4B58 08 00 00 3C 00 00 00 00 
.:4B60 00 00 00 00 00 00 00 00 
.:4B68 00 00 00 00 00 00 00 00 
.:4B70 00 00 00 00 00 00 00 00 
•:4B78 00 00 00 00 00 00 00 00 
.:4B80 0C 00 00 6B 00 00 2A 00 
.:4B88 00 7F 00 00 49 00 00 2A 
.:4B90 00 00 6B 00 00 14 00 00 
.:4B98 03 00 00 3C 00 00 00 00 
.:4BA0 00 00 00 00 00 00 00 00 
.:4BA8 00 00 00 00 00 00 00 00 
.:4BB0 00 00 00 00 00 00 00 00 
.:4BB8 00 00 00 00 00 00 00 00 
.!4BC0 01 00 00 03 80 00 IF C0 
•:4BC8 00 3F E0 00 FF F0 00 FF 
.:4BD0 E0 00 7F E0 00 7F C0 00 
.;4BD3 3F 80 00 07 80 00 03 00 
.!4BE0 00 00 00 00 00 00 00 00 
.:4BE3 00 00 00 00 00 00 00 00 
.:4BF0 00 00 00 00 00 00 00 00 
.:4BF8 00 00 00 00 00 00 00 00 
.:4C00 FF FF 00 0& FF FF 02 00 
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1260 

SIATDC 

DS 

1 


1270 

S2ATDC 

DS 

1 


1280 

S3AT DC 

DS 

1 


1290 

S1SURL 

DS 

1 


1300 

S2SIJRL 

DS 

1 


1310 

S3SURL 

DS 

1 


1320 

FILLO 

DS 

1 


1330 

FILHI 

DS 

1 


1340 

MMOD 

DS 

1 


1350 

RFIL 

DS 

1 

; END OF SHADOWS 

1360 

1370 

SNDTMi 

DS 

1 

;SOFTWARE TIMERS 

1380 

SNDTM2 

DS 

1 


1390 

SNDTM3 

DS 

1 


1400 

1410 

SRC 

DS 

2 

;POINTERS FOR DATA 

1420 

DST 

DS 

2 

;MOVEMENT 

1430 

SCRPT 

DS 

2 


1440 

SCRDST 

DS 

2 


1450 

1460 

NOTFT1 

DS 

2 

jPOINTERS TO NOTES 

1470 

NGTPT2 

DS 

2 


1480 

N0TPT3 

DS 

2 


1490 

NOTTM1 

DS 

2 

iPOINTERS TO NOTE TIMES 

1500 

N0TTM2 

DS 

2 


1510 

N0TTM3 

DS 

2 


1520 

OPTION 

DS 

1 


1530 

RAND1 

DS 

1 

iRANDOM NUMBER REGISTERS 

1540 

RAND 2 

DS 

1 


1550 

RAND 3 

DS 

1 


1560 

RAND 4 

DS 

1 


1570 

LEVEL 

DS 

1 

•.CURRENT LEVEL OF PLAY 

1580 

1590 

SCREEN 

DS 

1 

; SYSTEM TIMING REGISTERS 

1600 

RANSEC 

DS 

1 


1610 

SECOND 

DS 

1 


1620 

ENABLE 

DS 

1 


1630 

1640 

BUF 

DS 

8 

;TEMPORARY DATA BUFFERS 

1650 

BUF1 

DS 

8 


1660 

I BUF 

DS 

8 


1670 

MBUF 

DS 

8 


1680 

LPCNT1 

DS 

1 

;LOOP COUNTERS 

1690 

LPCNT2 

DS 

1 


1700 

LPCNT3 

DS 

1 


1710 

LPCNT4 

DS 

1 


1720 

1730 

1740 

COLOR 

DS 

1 

;THESE REGISTERS ARE 

1750 

POINT 

DS 

O 

:USED BY THE PLOTTING 

1760 

CTEMP 

DS 

1 

•ROUTINE 

1770 

GBASE 

DS 

2 


1780 

YPNT 

DS 

1 

;Y-COORDINATE 

1 790 

XPNT 

DS 

1 

:X-COORDINATE 

1800 

1810 

HMSB 

DS 

1 

;9'TH BIT REGISTER 

1820 
1830 
1 840 

HORNC 

DS 

1 

;HORIZONTAL INCREMENT 
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1350 

I860 

MER.NC 

DS 

1 

^VERTICAL INCREMENT 

1870 

LIMES 

DS 

1 

;NUMBER OF LIVES LEFT 

1880 

SCORE 

DS 

4 

:SCORE COUNTER 

1890 

MOUNTM 

DS 

8 

;MOUNTAIN VERTICAL 

1900 

MOUNTH 

DS 

3 

sMOUNTAIN HORIZONTAL 

1910 

MOUNTP 

DS 

8 

SSPRITE POINTERS 

1920 

1930 

MOUNTC 

DS 

8 

;MOUNTAIN COLORS 

1940 

1950 

I960 

MNTMSB 

5 

DS 

1 

;EXTRA MSB—MOUNTAIN 

1970 

UJHOLIU 

DS 

1 

;WHICH BAD GUY LEFT 

1980 

TMSCOL 

DS 

1 

;TEMP SSCOL 

1990 

2000 

2010 

2020 

TMBCOL 

5 

■ 

f 

DS 

1 

5TEMP SBCOL 

20 30 

PLAYH 

DS 

1 

;PLAYER HORIZONTAL 

2040 

2050 

MEANH 

DS 

7 

:BAD GUY HORIZONTAL 

2060 

PLAYM 

DS 

1 

;PLAYER VERTICAL 

2070 
20 80 

MEANM 

DS 

7 

:BAD GUY VERTICAL 

20 90 

PLAYC 

DS 

1 

;PLAYER COLOR 

2100 

2110 

MEANC 

j 

DS 

7 

;BAD GUY COLOR 

2120 

PLAYD 

DS 

1 

;PLAYER DIRECTION 

2130 

2140 

MEAND 

5 

DS 

7 

;BAD GUY DIRECTION 

2150 

PLAYE 

DS 

1 

;PLAYER EXPLOSION 

2160 

2170 

MEANE 

5 

DS 

7 

:BAD GUY EXPLOSION 

2180 

PLAYP 

DS 

1 

;PLAYER SPRITE POINT 

2190 

2200 

MEANP 

5 

DS 

7 

;BAD GUY POINTER 

2210 

2220 

2230 

MEANMM 

5 

DS 

*10 

;MOVEMENT CHART 

2240 

2250 

SHOTS 

5 

DS 

1 

;SHOTS IN FLIGHT 

2260 

SHOTSH 

DS 

8 

jSHOT HORIZONTAL 

2270 

SHOTSM 

DS 

8 

;SHOT VERTICAL 

2280 

2290 

SHOTSD 

5 

DS 

8 

iSHOT DIRECTION 

2300 

PLAYSP 

DS 

1 

;PLAYER SPEED 

2310 

BADSPH 

DS 

1 

;BAD GUY SPEED-HORIZ 

2320 

2330 

2340 

2350 

BADSPM 

5 

5 

5 

DS 

1 

;BAD GUY SPEED-VERT 

2360 


.END 



Listing C-27: The BOGDAT Source Code 

1000 ;RUT"30:BOGDAT" 

1010 ;LOAD"ASM",8 

1020 i 

1030 jTHIS IS BOGDAT—THE DATA FILE 



10 40 s FOR BOG HOP 


1050 ; 

1060 BITPOS 
1070 BITAND 
10S0 ANDPOS 
1090 s 
1100 TYPELK 
1110 ; 


.BYTE *01,*02,*04,*08,*10,*20,*40,*80 
. BYTE *FE’*FD,*FB,*F7, *EF,*DF,*Bh,*7F 
. BYTE *FE,*FD,*FB,*F7,*EF,*DF,*BF,*7F 

.BYTE *00,*04,*08,*00,*10,*14 


BEE1 


1120 
1130 
1140 
1150 
11 60 
1170 
11 80 
1 1 90 
1200 
1210 
1 220 
1230 
1240 ; 
1250 BEE2 
1 260 
1270 


•MOVEMENT FATTERNS FOR DIFFERENT 
jTYPES OF CHARACTERS 


. BYTE 4,4,6,2 ,*A,9,5,4,4,6,6,4,5,5,1 ,9,8,*A,2,6,6,6,4,4 
. BYTE 5,5,1,5,9,3,9,8,*A,*A,2,6,6,4,6,2 

. BYTE 4,4,6,2 ,*A,9,5,4,4,6,6,4,5,5,1,9,8,*A,2,6,6,6,4,4 
. BYTE 5,5,1 j 5,9,8,9,8,*A,*A,2,6,6,4,6,2 
.BYTE *@0,*00,*00 

. BYTE 4,6,6,6,6,6,6,6,2,6,2,6,2,*A,2,*A,*A,*A,8,*A,8,*A 
. BYTE 3,9,3,9,9,1 ,9,1,5,1,5,5,1,1,5,4,6,6,6 
.BYTE *00,*00,*00 


1280 : 
1290 BEE3 
1300 
1310 


. BYTE 6,6,6,4,4,4,5,5,5,1,5,5,1,1,9,9,9,8,9,8,8,*A,8 
. BYTE *A,3,*A,*A,2,*A,2,2,6,6.2,6,6,4,6,4 
.BYTE *00,*00,*00 


1320 ; 

1330 BEE4 
1340 
1350 
1360 
1370 
1330 ; 

1390 ; 

1400 ; 

1410 BIRD! 
1420 
1430 
1440 
1450 ; 

1460 BIRD2 
1470 
1430 
1490 
1500 ; 

1510 BIRD3 
1520 
1530 
1540 ; 

1550 BIRD4 
1560 
1570 
1580 ; 

1590 ; 

1600 ; 

1610 BAT1 
1620 


. BYTE 5,5,8,8 ,*A,*A,2,2,6,6,4,4,4,6,6,2,*A,*A,*A,8,8,9 
. BYTE 1,9,1,5,5,5,1,5,4,5,5,1 ,9,3,*A,2,6,2 
. BYTE 5,5,8,8 ,*A,*A,2,2,6,6,4,4,4,6,6,2,*A,*A,*A,8,8,9 
. BYTE 1,9,1,5,5,5,1,5,4,5,5,1,9,8,*A,2,6,2 
.BYTE- *00 ,*00 ,*00 


. BYTE 4 , 6 , 4 , 4 , 6 , 4 , 4 , 6 , 4 , 4 , 5, 4 , 4 , 5,5, 4 , 5,5,5,1,5,5,1,5 
.BYTE 5,4,4,6,6,2,6,2,6,6,4,6,6,4,6,4 
. BYTE 5,4,4,6,6,2,6,2,6,6,4,6,6,4,6,4 
.BYTE *00,*00,*00 

. BYTE 4,6,4,6,4,6,4,6,4,6,4,6,6,2,6,2,6,2,6,2,5,1,5,1 
. BYTE 5,1,5,1,5,4,5,4,5,4,5,4,5,4,5,4 
.BYTE 5,1,5,1,5,4,5,4,5,4,5,4 
.BYTE *00,*00,*00 

.BYTE 4,5,4,5,5,5,5,1,5,1,5,1,5,1,5,1,5,1,5,1,4,6,6,2 
.BYTE 6 , 2,2, 6 , 2,2,6,4,5,5,4,6,6,4,5,5 
.BYTE *00,*00,*00 

.BYTE 4,5,5,1,1,5, 1,5, 4,6, 2 , 6, 2 , 6,6,4,4,5,5,1,1,6,6,4 
.BYTE 6,6,2,2,6,4,5,5,5,4,4,6,6,6,2,6 
.BYTE *00,*00,*00 


. BYTE 4,5,4,6,4,5,4,5,1,5,1,4,1,5,4,5,2,5,4,6,4,6,2,6 
. BYTE 4,6,2,6,2,6,4,6,4,6,4,5,1 ,5,4,6 
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1630 
1640 ; 

1650 BAT2 
1660 
1670 
1680 ; 

1690 BAT3 
1700 
1710 
1720 : 

1730 BAT4 
1740 
1750 
1760 ; 

1770 ; 

1780 : 

1790 FR0G1 
1800 
1810 
1820 : 

1830 FR0G2 
1840 
1850 
I860 ; 

1870 FRGG3 
1830 
1890 
1900 } 

1910 FR0G4 

1920 

1930 


.BYTE $00,$ 00,$00 


. BYTE 
.BYTE 
. BYTE 


1 , 5 , 1 , 1 , 2 , 1 , 1 , 4 , 1 , 5 , 8 , 1 , 5 , 4 , 6 , 4 , 6 , 2 , 8 , 2 , 4 , 2 , 1,6 

2 , 6 , 4 , 2 , 5 , 1 , 4 , 8 , 1 , 5 , 4 , 6 , 6 , 2 , 6 , 4 
$00,$00,$00 


.BYTE 2,5,2,6,2,$A,9,$A,2,1,2,$A,4,$A,2,8,1,8,2,9,8, 
.BYTE 4,1,9,1,5,9,1,4,5.1,4,6,5.4,1,2,4, 

.BYTE $00,$ 00,$00 


.BYTE 4,5,4,1,5,2,5,1,9,5,1,9,8,$A,9,5,$A,8,$A,2,$A,8,2,6 
.BYTE 4,1,5,9,1,5,4,6.4,6,2,8,2,6,4,5 
.BYTE $00,$00,$00 


.BYTE 6 ,4, 6 ,4,3,3,3, 6 ,2, 6 ,2, 6 ,2, 6 ,3 

.BYTE 3,3,3,5,5, 5 , 5,5,3,3^3,3,4,4,4,3,3,3,5, 1 , 1 ,5,3,3,3 
.BYTE $00,* 00,$00 

. BYTE 4, 6 ,4,4, 6 ,4,4, 6 ,3,3,3,3,5,5,5,5,5, 3 , 3 , 3,3 
. BYTE 5,1, 1 ,5,1, 1 ,5,1, 1 ,3,3,3,4,4,4 ’ 3 , 3\3 * 3\3 ’ 

.BYTE $00,$ 00,$00 . 

.BYTE 1,1,1,3,3,3,3,3,$A,$A,$A,$A,$A,$A,$A 
. BYTE 3,3,3, 8 ,9, 8 ,9, 8 ,9, 8 ,9,3,3,3,$A,2,2,$A,2,2,$A,3,3,3,3 
.BYTE $0@,$ 00,$00 

. BYTE 8 , 8 , 8 , 8 ,3,3,3,9,9,9,3,3,3, $A , $A , 2 , $A , $A , 3,3,3 *, 3 
. BYTE 2,2,2,2,3,3,3,5,5,5,3,3,3,3,3 
.BYTE $00,$ 00,$00 


1940 
1950 
I960 
1970 
1980 
1990 
2000 
2010 
2020 
2030 
2040 
20 50 
2060 
20 70 
20 80 
2090 
2100 
2110 
2120 
2130 


SNAKE1 .BYTE 6 , 6 , 6 , 6 , 6 ,5,1,5,5,1,5,5,1,5, 6 , 6 ,5,5,5,5,2, 6 ,2 ,6 

.BYTE 2,6*2*5,5,2, 6 , 6 , 1 ,5,1,5,1,5,6^6* 

.BYTE $00,$ 00,$00 
5 

SNAKE2 .BYTE 6 , 2 , 6 , 2 , 5,5,5, 6 , 6 , 6 , 6 , 6 , 5 , 1,5,1,5,1,6,6,5 ,5 
.BYTE 1 , 5 , 6 , 2 , 6 , 6 , 2 . 6 , 6 , 2 , 6 , 6 , 2 , 515,5 
.BYTE $00,$06,$60 


DIFFERENT CHARACTERS HAVE 
DIFFERENT MOVEMENT PATTERNS. 

THE FOLLQWINO ADDRESS CHARTS 
ALLOW THE PROPER MOVEMENT TO BE 
SELECTED FOR THE CHARACTER. 


2140 

BEELK 

.WORD 

2150 


.WORD 

2160 

5 


2170 

BIRDLK 

.WORD 

2180 


.WORD 

2190 

5 


2200 

BATLK 

.WORD 

2210 


.WORD 
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2220 

2230 

2240 

2250 

2260 

2270 

2280 

2290 

2300 

2310 

2320 

2330 

2340 

2350 

2360 

2370 

2380 

2390 

2400 

2410 

2420 

2430 

2440 

2450 

2460 

2470 

2480 

2490 

2500 

2510 

2520 

2530 

2540 

2550 

2560 

2570 

2580 

2590 

2600 

2610 

2620 

2630 

2640 

2650 

2660 

2670 

2680 

2690 

2700 

2710 

2720 

2730 

2740 

2750 

2760 

2770 

2780 

2790 

2800 


FROGLK .WORD FROG1,FR0G2,FR063,FR0G4 
.WORD $0000,*0000 


SNAKLK .WORD SNAKE1,SNAKE2,SNAKE2,SNAKE1 
.WORD $0000.$0000 

BASLK .WORD BEELK,BIRDLK,BATLK,FROGLK,SNAKLK 


; BY CHANGING THE PATTERN LOOKUP 
sTABLES. THE CHARACTER WILL 
•NOME DIFFERENTLY. 


; BADSEQ IS THE SEQUENCE IN WHICH 
•THE DIFFERENT CHARACTERS WILL 
;APPEAR ON THE SCREEN. 


BADSEQ .BYTE 0,1,2,3,4,1,0,4,3,2,1,3,2,0,4,3,2,1,0,0 


•THE FOLLOWING LOOKUP CHART IS 
•USED TO FIND THE BASE ADDRESS 
•OF THE CHARACTER SET FOR THE 
;NUMBERS. THIS SET IS FOR USE IN 
;A HIGH RESOLUTION MULTI-COLOR 
:MODE. 

•THE NUMBER SET IS IN THE FILE— 

; "LKUP" — WHICH MUST BE LOADED 
•PRIOR TO RUNNING THE PROGRAM. 

NUMBER .WORD 2ERO , ONE ,TWO ,THREE , FOUR ,FIVE,SIX 
.WORD SEVEN,E16HT,NINE,NUL,$0000 


;THE FOLLOWING TWO CHARTS SET THE 
;VERTI CAL AND HORIZONTAL SPEEDS 
;OF THE CHARACTERS DEPENDING 
•ON THE LEVEL OF PLAY 

SPEEDH .BYTE 1,1,1,1,1,1,2,2,2,3,3,4,3,4,3,5,6 
SPEEDV .BYTE 1,2,1,1,1,1,2,3,2,2,3,5,2,5,4,6,7 


;THE FOLLOWING CHART IS USED TO 
jDETERMINE HOW OFTEN THE BAD GUYS 
;WILL FIRE. A VALUE OF ZERO WILL 
:NOT LET ANY BAD GUYS SHOOT 

FIRPGW .BYTE 1,2,4,4,5,8,8,6,6,5,8,6,9,6,6,8,9 


SHTDR .BYTE $04,$06,$05,$04 
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.BYTE *00,*55,*AA,*FF 
.BYTE *C0,*30,*0C,*03 

.END 


2810 COLK 
2820 POR 
2830 ; 
2840 


Listing C-28: The XXPLOT Subroutine Source Code 


1000 

5 PUT" 

30:XXPLOT 


1010 

;Y IN 

YPNT 



1020 

:X/2 

IN XPNT 


1030 

5 COLOR IN 

COLOR 


1040 

:GRAPHICS 

BASE ADDRESS IN GBASE 


1050 

5 




1060 

5 EXCLUSIVE 

OR'S A POINT 


1070 

5 




1030 

5 SINCE THE 

INPUT TO THIS ROUTINE 


1090 

;WILL 

BE SI 

PRITE POSITIONS, THE 


1100 

jXPNT 

AND 1 

YPNT REGISTERS WILL 


1110 

;BE ADJUSTED FOR THE SPRITE OFFSET 


1120 

5 




1130 

XPLOT 

ANOP 


1140 


LDA 

YPNT 


1150 


SEC 



1160 


SBC 

#*32 ;VERTICAL OFFSET 

1170 


CMP 

#*C7 


1130 


BCS 

RTR1 


1190 


TAX 



1200 


LDA 

XPNT 


1210 


SEC 



1220 


SBC 

#*0E sHORIZONTAL 

OFFSET/2 

1 230 


CMP 

#*A 0 


1240 


BCS 

RTR1 


1250 


LSR 

A 


1260 


LSR 

A 


1270 


TAY 



1230 


LDA 

GBASE 


1 290 


CLC 



1300 


ADC 

VLKUPL,X 


1310 


STA 

POINT 


1320 


LDA 

GBASE +1 


1330 


ADC 

VLKUPH.X 


1340 


STA 

POINT+1 


1350 


LDA 

POINT 


1360 


CLC 



1370 


ADC 

HLKUPL,Y 


1 380 


STA 

POINT 


1390 


LDA 

POINT+1 


1400 


ADC 

HLKUPH,Y 


1410 


STA 

POINT+i 


1420 

5 




1430 


LDA 

XPNT 


1440 


AND 

#*03 5 STRIP BIT F 

■os 

1450 


TAX 



1460 


LDY 

#*00 


1470 


LDA 

<POINT),Y 


1480 

5 AND PAND,) 

< ;CLEAR BIT 
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1490 

STA 

CTEMP 

1500 

LDY 

COLOR 

1510 

LDA 

COLK,Y 

1520 

AND 

FOR ,X 

1530 

EOR 

CTEMP 

1540 

LDY 

#*00 

1550 

STA 

(POINT),Y 

1560 RTR1 

RTS 


1570 : 



1530 5 



1590 

.END 


Listing C-29: The LOOKUP Data File 



1000 

28 

43 

29 

28 

43 

4F 

50 

59 

.:1168 

03 

04 

05 

06 

07 

40 

41 

42 


1003 

52 

49 

47 

48 

54 

20 

31 

39 

.:1170 

43 

44 

45 

46 

47 

80 

81 

82 


1010 

38 

34 

2 C 

20 

53 

54 

45 

56 

.51178 

83 

84 

85 

86 

87 

C0 

Cl 

C2 


1013 

45 

4E 

20 

42 

52 

45 

53 

53 

.51180 

C3 

C4 

C5 

C6 

C7 

00 

01 

02 


1020 

28 

50 

29 

20 

50 

45 

52 

46 

.51188 

03 

04 

05 

06 

07 

40 

41 

42 


1028 

4F 

52 

4D 

41 

4E 

43 

45 

20 

.51190 

43 

44 

45 

46 

47 

80 

81 

82 


1030 

31 

39 

38 

34 

2C 

20 

53 

54 

.51198 

83 

84 

85 

86 

87 

C0 

Cl 

C2 


1038 

45 

56 

45 

4E 

20 

42 

52 

45 

.S11A0 

C3 

C4 

C5 

C6 

C7 

00 

01 

02 


1040 

53 

53 

3C 

C0 

C3 

CC 

F0 

C0 

.sllA8 

03 

04 

05 

06 

07 

40 

41 

42 


1048 

3F 

00 

00 

C0 

C0 

C0 

C0 

C0 

.511B0 

43 

44 

45 

46 

47 

80 

81 

82 


1050 

00 

00 

0C 

3C 

0C 

0C 

0C 

0C 

. sUB8 

83 

84 

85 

86 

87 

C0 

Cl 

C2 


1058 

3F 

00 

00 

00 

00 

00 

00 

00 

.S11C0 

C3 

C4 

C5 

C6 

C7 

00 

01 

02 


1060 

00 

00 

3F 

C0 

00 

0F 

30 

C0 

. sUC8 

03 

04 

05 

06 

07 

40 

41 

42 


1068 

FF 

00 

00 

C0 

C0 

00 

00 

00 

. 5 1 1D0 

43 

44 

45 

46 

47 

80 

81 

82 


1070 

C0 

00 

FF 

00 

03 

0F 

00 

C0 

.S11D8 

83 

84 

85 

86 

87 

C0 

Cl 

C2 

.S1078 

3F 

00 

C0 

C0 

00 

00 

C0 

C0 

.sllE0 

C3 

C4 

C5 

C6 

C7 

00 

01 

02 


1080 

00 

00 

03 

0F 

33 

C3 

FF 

03 

. sUE8 

03 

04 

05 

06 

07 

40 

41 

42 


1088 

03 

00 

00 

00 

00 

00 

C0 

00 

.S11F0 

43 

44 

45 

46 

47 

80 

81 

82 


1090 

00 

00 

FF 

C0 

FF 

00 

00 

C0 

.S11F8 

83 

84 

85 

86 

87 

00 

00 

00 


1098 

3F 

00 

C0 

00 

00 

C0 

C0 

C0 

.51200 

00 

00 

00 

00 

00 

01 

01 

01 


10A0 

00 

00 

0F 

30 

C0 

FF 

C0 

C0 

.sl208 

01 

01 

01 

01 

01 

02 

02 

02 


10A8 

3F 

00 

C0 

00 

00 

00 

C0 

C0 

.51210 

02 

02 

02 

02 

02 

03 

03 

03 


10 B0 

00 

00 

FF 

00 

03 

0C 

30 

30 

.51218 

03 

03 

03 

03 

03 

05 

05 

05 


10B8 

30 

00 

C0 

C0 

00 

00 

00 

00 

.51220 

05 

05 

05 

05 

05 

06 

06 

06 


10C0 

00 

00 

3F 

C0 

C0 

3F 

C0 

C0 

.51228 

86 

06 

06 

06 

06 

07 

07 

07 


1 0C8 

3F 

00 

00 

C0 

C0 

00 

C0 

C0 

.51230 

07 

07 

07 

07 

07 

08 

08 

08 


10D0 

00 

00 

3F 

C0 

C0 

3F 

00 

03 

.51238 

08 

08 

08 

08 

08 

0A 

0A 

0A 


10D8 

FC 

00 

00 

C0 

C0 

C0 

C0 

00 

.51240 

0A 

0A 

0A 

0A 

0A 

0B 

0B 

0B 


10E0 

00 

00 

00 

00 

00 

00 

00 

00 

.51248 

0B 

0B 

0B 

0B 

0B 

0C 

0C 

0C 


1 0E8 

00 

00 

00 

00 

00 

00 

00 

00 

.51250 

0C 

0C 

0C 

0C 

0C 

0D 

0D 

0D 


10 F0 

00 

00 

00 

28 

50 

78 

A0 

C8 

.51258 

0D 

0D 

0D 

0D 

0D 

0F 

0F 

0F 


10F8 

F0 

18 

40 

68 

90 

B8 

E0 

08 

.51260 

0F 

0F 

0F 

0F 

0F 

10 

10 

10 


1100 

30 

58 

80 

A8 

D0 

F8 

20 

48 

.51268 

10 

10 

10 

10 

10 

11 

11 

1 1 


1103 

70 

98 

C0 

04 

04 

04 

04 

04 

.51270 

1 1 

11 

11 

11 

1 1 

12 

12 

12 


1110 

04 

04 

05 

05 

05 

05 

05 

05 

.51278 

12 

12 

12 

12 

12 

14 

14 

14 


1118 

06 

06 

06 

06 

06 

06 

06 

06 

.51280 

14 

14 

14 

14 

14 

15 

15 

15 


1120 

07 

07 

07 

07 

07 

00 

01 

02 

.51288 

15 

15 

15 

15 

15 

16 

16 

16 


1128 

03 

04 

05 

06 

07 

40 

41 

42 

.51290 

16 

16 

16 

16 

16 

17 

17 

17 


1130 

43 

44 

45 

46 

47 

80 

81 

82 

.51298 

17 

17 

17 

17 

17 

19 

19 

19 


1138 

83 

84 

85 

86 

87 

C0 

Cl 

C2 

.s12A0 

19 

19 

19 

19 

19 

1A 

1A 

1A 


1140 

C3 

C4 

C5 

C6 

C7 

00 

01 

02 

.s12A8 

1A 

1A 

1A 

1A 

1A 

IB 

IB 

IB 


1148 

03 

04 

05 

06 

07 

40 

41 

42 

.:12B0 

IB 

IB 

IB 

IB 

IB 

1C 

1C 

1C 


1150 

43 

44 

45 

46 

47 

80 

81 

82 

.s12B8 

1C 

1C 

1C 

1C 

1C 

IE 

IE 

IE 


1158 

83 

84 

85 

86 

87 

C0 

Cl 

C2 

.s12C0 

IE 

IE 

IE 

IE 

IE 

IF 

IF 

IF 


1160 

C3 

C4 

C5 

C6 

C7 

00 

01 

02 

.s12C8 

IF 

IF 

IF 

IF 

IF 

00 

08 

10 
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.:12D0 

13 

20 

28 

30 

38 

40 

48 

50 


5 1368 

00 

FF 

00 

FF 

00 

FF 

00 

FF 

.:12D8 

58 

60 

68 

70 

78 

30 

88 

90 


5 1370 

00 

FF 

00 

FF 

00 

FF 

00 

FF 

.:12E0 

98 

A0 

A8 

B0 

B8 

C0 

C8 

D0 


s!378 

00 

FF 

00 

FF 

00 

FF 

E0 

F7 

.:12E3 

D8 

E0 

E8 

F0 

F8 

00 

08 

10 


5 1380 

00 

DF 

00 

85 

02 

FF 

00 

DD 

.:12F0 

18 

20 

28 

30 

38 

00 

00 

00 


s 1 388 

00 

FF 

00 

FF 

D0 

FF 

02 

DF 

.;12F8 

00 

00 

00 

00 

00 

00 

00 

00 


5 1390 

00 

FF 

00 

FF 

00 

FF 

00 

FF 

.:1300 

00 

00 

00 

00 

00 

00 

00 

00 


5 1398 

00 

FF 

00 

FF 

00 

FF 

00 

FF 

.:1308 

00 

00 

00 

00 

00 

00 

00 

00 


s 13A0 

00 

FF 

00 

FF 

7D 

DD 

02 

FF 

.:1310 

00 

00 

00 

00 

00 

01 

01 

01 


s 1 3A8 

00 

FF 

00 

FF 

00 

FF 

D1 

FF 

. :1318 

01 

01 

01 

01 

01 

FF 

00 

72 


s 1 3B0 

00 

7F 

00 

FF 

00 

D5 

22 

FF 

.:1320 

00 

FI 

00 

FF 

00 

FF 

00 

FF 


s 1 3B8 

00 

FF 

00 

FF 

00 

FF 

00 

FF 

.:1328 

00 

FF 

00 

FF 

00 

FF 

2F 

FF 


s 1 3C0 

05 

FF 

00 

FF 

00 

FF 

00 

FD 

.51330 

00 

70 

00 

FF 

00 

FF 

00 

FF 


s 1 3C8 

00 

FF 

00 

FF 

00 

FF 

00 

FF 

.51338 

00 

FF 

00 

FF 

00 

FF 

4F 

F7 


s 1 3D0 

00 

FF 

00 

FF 

00 

FF 

00 

FF 

.51340 

00 

72 

00 

DD 

00 

FF 

00 

58 


s 13D8 

00 

FF 

00 

2F 

C0 

FF 

00 

FF 

.51348 

00 

FF 

00 

EF 

00 

70 

00 

FF 


s 13E0 

00 

FF 

00 

FF 

00 

FF 

00 

FF 

.51350 

00 

FF 

00 

FF 

00 

FF 

00 

DF 


s 1 3E8 

DD 

FF 

00 

FF 

00 

FF 

00 

F6 

.51358 

00 

FF 

00 

FF 

00 

FF 

00 

F0 


: 13F0 

4C 

C8 

15 

EE 

5D 

08 

EE 

5D 

.51360 

00 

7F 

00 

7D 

20 

FF 

52 

FF 


: 13F8 

08 

D0 

39 

AD 

51 

08 

C9 

FF 

sting C-30: The 

BOGSPR File 













B* 

SR 









s 40F0 

00 

00 

00 

00 

00 

00 

00 

00 

PC 

AC 

XR 

YR 

SP 




. 

40F8 

00 

00 

00 

00 

00 

00 

00 

00 

.;C03E 

32 

00 

C3 

00 

F6 




. 

54100 

01 

00 

80 

0A 

02 

60 

26 

49 

• 









. 

: 41 08 

A4 

60 

AA 

0A 

90 

18 

09 

00 










. 

54110 

20 

00 

02 

48 

00 

02 

08 

00 

.54000 









. 

5 4118 

00 

00 

00 

00 

00 

00 

00 

00 

20 

00 

00 

8C 

00 

00 

82 

00 

. 

54120 

00 

00 

00 

00 

00 

00 

00 

00 

.54008 

20 

80 

FA 

80 

3A 

AE 

00 

00 

. 

41 £8 

00 

00 

00 

00 

00 

00 

00 

00 

.54010 

EA 

C0 

0A 

08 

20 

0E 

08 

0C 

, 

4130 

00 

00 

00 

00 

00 

00 

00 

00 

.54018 

00 

02 

A0 

00 

00 

00 

00 

00 

• 

4138 

00 

00 

00 

00 

00 

00 

00 

00 

.54020 

00 

00 

00 

00 

00 

00 

00 

00 

. 

4140 

09 

00 

60 

1A 

82 

98 

A0 

41 

.54028 

00 

00 

00 

00 

00 

00 

00 

00 

, 

4148 

04 

40 

8A 

0A 

00 

24 

01 

00 

.54030 

00 

00 

00 

00 

00 

00 

00 

00 

• 

4150 

28 

02 

00 

60 

00 

02 

A0 

00 

.54038 

00 

00 

00 

00 

00 

00 

00 

00 

, 

4158 

01 

20 

00 

00 

13 

00 

00 

80 

.54040 

2C 

00 

00 

82 

00 

00 

82 

00 

, 

4160 

00 

00 

00 

00 

00 

00 

00 

00 

.54048 

20 

20 

80 

30 

20 

8E 

00 

0A 

a 

4168 

00 

00 

00 

00 

00 

00 

00 

00 

.s4050 

AB 

A8 

00 

EA 

02 

0E 

B8 

02 

a 

4170 

00 

00 

00 

00 

00 

00 

00 

00 

.s4058 

0A 

02 

BC 

00 

00 

00 

00 

00 

. 

4173 

00 

00 

00 

00 

00 

00 

00 

00 

.54060 

00 

00 

00 

00 

00 

00 

00 

00 

a 

4180 

80 

00 

06 

10 

00 

28 

24 

00 

.54068 

00 

00 

00 

00 

60 

00 

00 

00 

a 

4183 

90 

02 

01 

A0 

06 

0A 

40 

01 

.54070 

00 

00 

00 

00 

00 

00 

00 

00 

a 

4196 

26 

00 

02 

68 

00 

00 

90 

00 

.54078 

00 

00 

00 

00 

00 

00 

00 

00 

. 

4198 

00 

30 

00 

01 

00 

00 

0A 

40 

.54080 

20 

00 

00 

8F 

00 

20 

80 

80 

. 

41A0 

00 

20 

80 

00 

02 

20 

00 

01 

.54088 

80 

CA 

8F 

00 

20 

FA 

00 

00 

, 

41A8 

08 

00 

00 

00 

00 

00 

00 

00 

.54090 

AA 

C0 

0A 

A0 

08 

0B 

08 

02 

. 

41B0 

00 

00 

00 

00 

00 

00 

00 

00 

.54098 

00 

03 

C2 

00 

00 

23 

00 

00 

, 

41B8 

00 

00 

00 

00 

00 

00 

00 

00 

.540A0 

00 

00 

06 

00 

00 

00 

00 

00 

. 

41C0 

00 

00 

66 

00 

02 

A4 

06 

01 

.s 40A8 

00 

00 

00 

00 

00 

00 

00 

00 

a 

41C8 

13 

29 

8A 

08 

18 

98 

02 

A6 

.s 40B0 

00 

00 

00 

00 

00 

00 

00 

00 
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0 0 

00 

8 8 

00 

0 0 

0 0 

08 

8 8 


4A90 

00 

00 

6 B 

00 

00 

14 

00 

00 

4BE8 

0 0 

00 

8 0 

8 0 

0 0 

00 

0 0 

8 8 


4A98 

00 

00 

00 

00 

00 

00 

00 

00 

4BF0 

00 

0 0 

80 

0 8 

00 

80 

00 

00 


4AA0 

00 

00 

00 

00 

00 

00 

00 

00 

4BF3 

0 0 

0 0 

0 0 

0 0 

0 0 

00 

00 

0 6 


4AAS 

00 

00 

00 

00 

00 

00 

00 

00 

4 C 0 0 

FF 

FF 

0 8 

00 

FF 

FF 

00 

80 


4AB0 

00 

00 

00 

00 

00 

00 

00 

00 











4AB8 

00 

00 

00 

00 

00 

00 

00 

00 











4AC0 

0C 

00 

00 

2A 

00 

00 

2A 

00 











Listing C-31: The OOPLOT Subroutine Source Code 


1000 :PUT"30:OOPLOT 
1010 sY IN YPNT 
1020 sX/2 IN XPNT 
10 30 5 COLOR IN COLOR 

1040 :GRAPHICS BASE ADDRESS IN GBASE 
1050 ; 

1060 : OR/' S A POINT 
1070 ; 

1080 ; 

1090 ; 

1106 : 

1110 ; 


252 





1120 
1130 
1140 
1150 
1160 
1170 
1 180 
11 90 
1200 
1210 
1220 
1230 
1 240 
1250 
1 260 
1270 
1280 
12.90 
1300 
1310 
1320 
1330 
1340 
1350 
1 360 
1370 
1 380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 


OF'LOT ANOP 

LDA YPNT 
CMP #*C7 
BCS RTR1 
TAX 

LDA XPNT 
CMP #*A0 
BCS RTR1 
LSR A 
LSR A 
TAY 

LDA GBASE 
CLC 

ADC vt.KUPL .X 

STA POINT 
LDA GBASE+1 
ADC L'LKUPH ,X 
STA POINT+i 
LDA POINT 
CLC 

ADC HLKUPL.Y 
STA POINT 
LDA POINT +1 
ADC HLKUPH.Y 
STA POINT+1 

LDA XPNT 

AND #*03 :STRIP BIT PO 

TAX 

LDY #*00 
LDA (POINT).Y 

AN D PAN D . X : 0 i.. La R BIT 

STA CTEMP 

LDY COLOR 

LDA COLK.Y 

AND PGR.X 

ORA CTEMP 

LDY #*0.0 

STA (POINT).Y 


RTR1 

RTS 


POR 

. BYTE 

*C0.*30,*0C,*03 

PAND 

. BYTE 

*3F,*CFi*F3,*FC 

COLK 

. BYTE 

*00,*55, *AA,*FF 


. END 



co o 



Glossary 


accumulator —An internal register in the 
microprocessor that is used by all arithmetic in¬ 
structions and most data transfer instructions. 

assembler —A program that translates 
mneumonics for machine language instructions 
into machine language. 

bank —One of four 16K blocks of memory in the 
Commodore 64. 

bit —One binary digit. A bit can only have the 
values 0 and 1. 

bitmapped graphics— A graphics mode in which 
each pixel on the screen is represented by one 
or more bits in memory. 

byte —A grouping of eight bits. A byte can repre¬ 
sent any value from 0 to 255. The Commodore 
64 operates on memory one byte at a time. 

color RAM —A IK area in memory, starting at 
$D800, in which each byte represents the color 
for one character on the screen. 

coresident assembler —An assembler program 
that has its editor, assembler, loader, and monitor 


in memory at the same time. 

disassembly— A recreation of assembly language 
source code created by reading the object code 
and assigning the mneumonics to the code. This 
is the reverse of assembling a program. 

flicker fusion frequency— 24 cycles per second 
is the frequency at which the human eye will 
merge the individual screens being shown into 
continuous movement. 

graphics memory —An area in memory where 
the bitmapped graphics images are stored. 

HEX —Abbreviation for hexadecimal. 

HEX file— An intermediate file produced by the 
assembler that can be loaded into memory us¬ 
ing a loader program or transferred to another 
machine. 

hexadecimal— The base 16 numbering system. In 
this numbering system, a digit can have a value 
of 0 to 15. Numbers above 9 are represented by 
the letters A through F. 
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interrupt —A signal that causes the micro¬ 
processor to stop executing the current program 
and execute another program in memory. The 
address where the first program was stopped 
is stored on the stack as well as the status reg¬ 
ister, so that program execution can continue at 
a later time. 

interrupt vector— Two bytes in memory that con¬ 
tain the address of the routine to be executed 
when an interrupt occurs. 

KERNAL—A set of machine language 
subroutines in ROM that can be called by your 
program to perform complex tasks. None of the 
KERNAL routines in the Commodore 64 are 
useful for games. 

label— A string of characters that can be used to 
represent memory locations or data. 

loader— A program that translates a HEX file in¬ 
to binary data and stores it into memory. 

LSB—The least significant bit in a byte. 

macro—A user-definable macroinstruction made 
up of one or more instructions. It is treated like 
any other instruction during programming and 
expanded into its component instructions during 
assembly. 

maskable interrupt— An interrupt that can be 
disabled through software. 

mneumonics —Short character strings that are 
used as memory aids for assembly la nguage in¬ 
structions. 

monitor—A program that is used to examine and 
change memory locations. It also can be used to 
load and save areas of memory. 

MSB—The most significant bit in a byte. 

multiplexing— The technique of using one sprite 
to display two different images. The different im¬ 
ages may overlap. 

nibble—A grouping of four bits. A nibble can be 
represented by one hexadecimal digit. 


object code —Binary data that can be directly ex¬ 
ecuted by the microprocessor, 
opcode— A value that represents the instruction 
to be executed. 

operand— The data that is to be operated on by 
the instruction. 

pixel— The smallest dot that can be generated by 
the computer to be displayed on the screen, 
program counter— An internal 16 bit register 
that is used to access the next memory location. 

screen —One refresh of the video display. The 
display is refreshed 60 times per second, 
scroll —Smooth movement of a portion of the 
screen. 

source code— Text that represents an assembly 
language program. This will be translated into 
machine code by the assembler, 
sprite — A small object that can be moved in¬ 
dependently of the background, 
stack — An area of memory that is used by the 
microprocessor for temporary storage, 
stack pointer — A byte that is used as an index 
into the stack area. 

status register —An internal register whose bits 
are affected by the different instructions. Bits in 
the status register can be tested by branching in¬ 
structions. 

touch pad —A device that plugs into the joystick 
port on the computer, and when touched on its 
surface, returns a X and Y coordinates represen¬ 
ting the position on the pad where the touch oc¬ 
curred. 

zero page— The area in RAM from $0000 to 
$00FF, which can be accessed by the 
microprocessor faster than any other area in 
memory. A program that uses zero page address¬ 
ing extensively can be 2/3 the size that the pro¬ 
gram would be otherwise. 
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Index 


<, 4, 5 
.BYTE, 4, 51 
.DBYTE, 4 
.END, 4 
.LIB, 4, 20, 65 
.MAC, 5 
.MND, 5 
.WORD, 4 
6510 chip, 9 
6526 chip, 11 
6567 chip, 11 
6591 chip, 11 

A 

absolute addresses, 7 
absolute commands, 15 
absolute indexed addressing, 15 
accumulator, 11 
ADC instruction, 78 
address bus, 22 
address lines, 11 
addressing modes, 14 
ADRES macro, 100 
AND instruction, 78 
animating sprites in BOGHOP, 73 
animation, 2 
ANOP macro, 100 
Architecture, 6510, 11 
arithmetic instructions, 13, 14 
ASL instruction, 79 
ASL2 macro, 100 
assembler, 4 

assembler, choosing an, 6 
assembler, functions of, 5 
assembly language, 4 

B 

bad guys in BOGHOP, 71 
band pass filter, 39 
BANK macro, 24, 101 
bank switching, 11, 22 
banks of memory, 23 
BASE address register, 27 
BASIC, 3 


BASIC program, 120 
BCC instruction, 79 
BCOLO register, 29 
BCS instruction, 80 
BEQ instruction, 80 
BGT macro, 101 
BIN, 120 
binary data, 4 
binary data file, 120 
binary files, 119 
bit, 9 

BIT instruction, 79 
bit mapping, 29 
bitmapped graphics grid, 48 
blanking the screen, 33 
BLE macro, 101 
BLNK macro, 102 
BMI instruction, 80 
BNE instruction, 81 
BOGDAT file, 65 
BOGDAT source code, 243 
BOGDEF, 65 
BOGDEF file, 64 
BOGDEF source code, 241 
BOGHOP game, 64 
BOGHOP program, 64 
BOGHOP program source code, 
207 

BOGHOP.O program, 233 
BOGSPR file, 249 
BPL instruction, 81 
BPRIOR, 32 
BREAK instruction, 81 
buffer areas, 67 
bugs, 18 

BVC instruction, 82 
BVS instruction, 82 
byte, 4, 9 

C 

cartridge monitors, 8 
CENTIPEDE, 58 
central processing unit, 11 


chaining, 18 

character generator ROM, 25 

character generator section, 25 

character graphics grid, 50 

character sets, custom, 28 

characters sets, custom, 28 

chip, sound interface device, 11 

chip, video interface, 11 

chips, 10 

CINV, 20 

CLBACK1, 56 

CLBACK1 file, 169 

CLC instruction, 82 

CLD instruction, 83 

CLI instruction, 83 

CLSP1, 56 

CLSP1 file, 169 

CLSP2, 55 

CLSP2 file, 167 

CLV instruction, 83 

CMP instruction, 84 

collision detection, 32 

collision status register, 19 

color on televisions, 51 

color RAM, 27 

color, sprite, 31 

COM-KO program, 54, 153 

commands, assembly language, 6 

comments, 13 

Commodore’s Macro Assembler 
Development System, 4 
COMMON file, 68 
COMMON file, 41, 65 
COMMON source code, 142 
complex interface adapter chips, 11 
concepts, game, 61 
conditional branching instructions, 
14 

control lines, 22 
controls, sprite, 31 
coresident assembler, 6 
CPX instruction, 84 
CPY instruction, 85 
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D 

data areas, defining, 6 

data definitions, 18 

DATA file, 41 

data movement, 13 

data movement instructions, 14 

data section of BOGHOP, 68 

DATA source code, 144 

data, tables of, 6 

DBADC macro, 102 

DBADC1 macro, 103 

DBDEC macro, 5 

DBINC, 103 

DBINC macro, 103 

DBPL macro, 103 

DBSBC macro, 104 

DBSBCI macro, 104 

DDRA and DDRB registers, 34 

debugging, 18 

DEC instruction, 85 

defining the system, 70 

definitions, RAM, 66 

demonstration, sound generator, 41 

designing video games, 57 

DEX instruction, 86 

DEY instruction, 86 

difficulty levels, 62 

disassembly, 5 

DISPLAY PIC program, 55, 153 
display, video, 1 
DONKEY-KONG, 58 
DS macro, 104 
DS macro, 65 

E 

EDIT SND program source code, 
145 

editor, sound, 44 
editor, text, 6 
electron beam, 1 
elements of game design, 61 
enabling a sprite, 31 
EOR instruction, 86 
equates statements, 69 
expansion, data, 7 
expansion, macro, 7 
expansion, sprite, 31 

F 

FILBYT macro, 105 
FILL macro, 105 
filtering sounds, 36 
flicker fusion frequency, 14 
flow of control instructions, 2, 13 
frame, 2 

fusion frequency, 2 

G 

glossary, 254 
GRABAS macro, 27, 105 
GRAPH macro, 106 
graphics tablet, 52 


graphics, hand coding, 47 
grids, graphic, 50 

H 

hardware, 10 
hardware registers, 26 
harmonic content, 39 
HDEC macro, 106 
hex file, 7 
hexadecimal, 10 
high pass filter, 39 
HINC macro, 106 


immediate mode addressing, 14 
implied addressing, 16 
INC instruction, 87 
indirect addressing, 16 
indirect addressing with indexes, 15 
initializing RAM, 70 
instruction set 6510, 77 
instruction types, 13 
INT DEMO.O program, 133 
INTI, 20 

INTER-DEMO source code, 132 
interpreter, BASIC, 3 
interrupt demonstration, 20 
interrupt routines in BOGHOP, 74 
interrupts, 19 
interrupts, video, 33 
INX instruction, 87 
INY instruction, 87 
IPULL macro, 107 

J 

JCC macro, 107 

JCS macro, 107 

JEQ macro, 108 

JGE macro, 108 

JGT macro, 108 

JLE macro, 109 

JLT macro, 109 

JMI macro, 109 

JMP instruction, 88 

JNE macro, 110 

JOY1 and JOY2 registers, 34 

joystick, 55 

joysticks, 34, 74 

JPL macro, 110 

JSR, 6 

JSR instruction, 88 

K 

KERNAL routines, 22 
KILL macro, 20, 112 
KO-COM program, 54, 153 
Koala Pad, 54 

L 

labels, 13 

LDA instruction, 88 


LDMEM macro, 110 
LDMEMX macro, 111 
LDMEMY macro, 111 
LDX instruction, 89 
LDY instruction, 89 
least significant bit, 9 
level of play, BOGHOP, 71 
LEVEL register, 66 
levels, difficulty, 62 
loader, 7 

LOOKUP data file, 248 
LOOKUP file, 65 
low pass filter, 39 
LSR instruction, 90 
LSR2 macro, 111 

M 

machine language, 3 
MACLIB file, 64, 99 
MACLIB source code, 121 
Macro Assembler Development 
System, 4 

macro library, 17, 65 
macro-instructions, 5 
macros, 5, 21, 99 
main program, 1,718 
main program, BOGHOP, 70 
mask register, video interrupt, 33 
maskable interrupt, 20 
memory banks, 23 
memory dumps, 119 
memory locations, 4 
memory maps, selecting, 22 
microprocessor, 9 
MLTSP register, 31 
mnemonics, 4 
mode, bitmapped, 29 
modes, addressing, 14 
modules, separate, 18 
monitor, 1 

monitor, assembly language, 7 
most significant bit, 9 
movement subroutines in BOGHOP, 
76 

multicolor bitmapped mode, 30 
multicolor graphics grids, 49 
multicolor mode, 28 
multiplexing, 2 
multipliers, sprite, 31 
MULTOF macro, 30, 112 
MULTON macro, 30, 112 
MVCOL macro, 27, 113 
MVIT subroutine, 154 
MVMEM macro, 113 

N 

names, assignment of, 5 
nibble, 9 

NIBLL macro, 113 
NIBLR macro, 114 
NMINV, 20 
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noise, 36 

nonmaskable interrupts, 20 
NOP instruction, 76, 90 
NOT macro, 114 
NOTPT register, 66 
NOTTM register, 66 

O 

OOPLOT file, 65 

OOPLOT subroutine source code, 
252 

opcode, 13 
opcodes, 4 
operand, 13 

operating system, disabling, 20 
OPTION register, 66 
ORA instruction, 91 

P 

PAC-MAN, 57 
packages, graphic, 5,253 
PEEK, 4 

PHA instruction, 91 
PHOENIX VI .4N program, 169 
phosphors, 1 
PHP instruction, 91 
PIC A CASTLE, 55 
PIC A CASTLE Koala Pad picture 
file, 154 
pixel, 1 

PLA instruction, 92 
players in BOGHOP, 72 
PLP instruction, 92 
point plotting routine, 69 
pointer, stack, 12 
pointers, sprite, 30 
POKE, 4 

positioning sprites, 31 
priorities, sprite, 32 
priority, sprite, 30 
program counter, 11 
pseudo opcodes, 4 
pulse, sync, 1 
PUNPCK macro, 114 
purposes of games, 61 

Q 

QDDEC macro, 115 
QDINC macro, 115 

R 

RAM, 11 

RAM definition, 66 
RAM definitions, 17 
RAM registers, 7 
RAND registers, 66 
RANSEC, 66 
RAST macro, 20, 115 
raster interrupt, 19, 20 
RASTER register, 33 
register names, 21 
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registers, X and Y, 11 
relative addressing, 16 
relocation of loading address, 7 
resetting, 20 

Revenge of the Phoenix, 59 
Revenge of the Phoenix game pro¬ 
gram, 169 
ROL instruction, 92 
ROM, 11 

ROR instruction, 93 
routines, 18 
RTI instruction, 93 
RTS instruction, 93 


S 

SBC instruction, 94 
scores, 70 
scoring, 63 
screen, 2 

screen maker utility, 56 
SCREEN timer, 66 
SCREEN-MAKE program, 167 
scrolling, 33 
SEC instruction, 94 
SED instruction, 95 
SEI instruction, 95 
setting sprite color, 31 
shots in BOGHOP, 72 
SLIB.O, 55, 56 
SLIB.O file, 166 
SMNPC macro, 116 
SMNPCX macro, 116 
SNDDEF file, 41 
SNDDEF source code, 143 
SNDEF file, 41 
SNDTM registers, 66 
software, 53 

SOUND DEMO program, 139 
SOUND EDIT program, 151 
sound editor, 41 
sound effects in games, 62 
sound interface device chip, 11 
SOUND program source code, 133 
source code file, 120 
source code files, 119 
speed of assembly, 6, 7 
sprite grid, unexpanded, 51 
sprite grids, expanded, 52 
Sprite Maker, 55 

SPRITE MAKER PROGRAM, 165 
sprites, 30 

SPRXSZ and SPRYSZ registers, 51 

SRC, 120 

SSCOL, 33 

SSCOL register, 32 

STA instruction, 95 

stack, 12 

standard text mode, 24 
status register, 12 
STX instruction, 96 
STY instruction, 96 


subroutines, 6, 18 
symbol table, 7 
sync pulse, 1 
SYSDEF, 21 
SYSDEF file, 64 
SYSDEF source code, 131 
system definitions, 17 


T 

TAX instruction, 96 
TAY instruction, 97 
televisions, 1, 51 
testing instructions, 13, 14 
TEXT macro, 116 
text editor, 6 
text memory, 25 
TEXT mode, 27 
tones, 36 

TPDEC macro, 117 
TPINC macro, 117 
TSX instruction, 97 
TXA instruction, 98 
TXBAS macro, 27, 17 
TXS instruction, 97 
TYA instruction, 98 

U 

UNBLNK macro, 118 
UNPACK macro, 118 
update time, 2 

V 

vertical sync pulse, 1 
VIC chip, 23 
VIC II, 11 
VIDBAS, 27 

VIDBAS register, 24, 25, 27 
video display, 1 
video games, designing, 57 
video interface chip, 11 
video interrupts, 33 
VIRQ register, 33 
VIRQM register, 33 
visual impact of games, 62 

W 

waveforms, 36 

X 

XSCRL register, 33 
XXPLOT, 69 
XXPLOT file, 65 

XXPLOT subroutine source code, 
247 

Y 

YSCRL register, 29, 33 

Z 

zero page addressing, 14 
zero page indexed addressing, 15 
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Commodore 64™ Assembly 
Language Programming 

if you are intrigued with the possibilities of the program included in Commodore 64™ Assembly 
Language Programming (TAB Book No. 1919), you should definitely consider having the ready-to- 
run disk containing the software applications. This software is guaranteed free of manufacturer’s 
defects. (If you have any problems, return the disk within 30 days, and we’ll send you a new one.) 
Not only will you save the time and effort of typing the programs, the disk eliminates the possibility 
of errors that can prevent the programs from functioning. Interested? 


Available on disk for the Commodore 64™ at $19.95 for each disk plus $1.00 each shippina and 
handling. “ 

- ------ 

I’m interested. Send me: \ 

-disk for the Commodore 64 (6422S) 1 

--TAB BOOKS catalog | 

-Check/Money Order enclosed for $19.95 plus $1.00 shipping and handling | 

for each disk ordered. ■ 

-VISA _ MasterCard I 

Account No. _ Expires_ | 

Name ___ 1 
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Signature ___ ■ 
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Commodore 64™ Assembly Language 
Arcade Game Programming 

by Steve Bress 

Discover the secrets of writing your own 
pro-quality, fast-action, animated arcade games! 

Unlock an exciting new dimension of your C-64’s graphics capabilities 
that’s just not possible when you program in BASIC! Discover how you can 
create amazingly sophisticated arcade-type games featuring the fast-paced, 
animated action and sophisticated sounds used in arcade video machines 
and commercially produced computer games retailing for upwards of $40! 
Even find out how you can use assembly language game techniques to bet¬ 
ter control your C-64 in all types of programming applications! 

Everything you need is here in this learn-by-doing handbook. It gives 
you a firm understanding of how your C-64 functions—the VIC II and SID 
chips, the way memory is banked, how graphics are controlled, collision 
detection, interrupts, and more. You’ll find numerous techniques that will 
help you easily solve initial game designing problems plus dozens of 
subroutines, utilities, tips, and tricks that can save you hours of coding time 
when you are creating games or almost any other kind of assembly language- 
based program. 

There’s even a complete set of macros that makes the design of sprites 
and animation far easier and more productive than anything you’ve ever been 
able to accomplish using BASIC. Creation of music and sound effects is also 
thoroughly explained. And, using the two full-scale example programs 
(Revenge of the Phoenix and Boghop) as your guide, you’ll be designing 
your own animated arcade games in record time. 

If you’ve ever wanted to try your hand at writing fast-paced arcade ac¬ 
tion games for your C-64, you’ll find this a truly exciting sourcebook. It shows 
you how to effectively come up with game ideas, how to plan your game 
scenario, how to code, and finally to test your game to make sure it’s work¬ 
ing the way you want it to! 

Steve Bress is the co-owner of a company that specializes in custom 
interface boards for home computers. He has extensive programming ex¬ 
perience for home computers ranging from the ATARI 2600 to the IBM PC! 
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